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ABSTRACT 


In this thesis, we searched several monomial and permutation progenitors for symmet- 
ric presentations of important images, nonabelian simple groups, their automorphism 
groups, or groups that have these as their factor groups. Our target non-abelian sim- 
ple groups included sporadic groups, linear groups, and alternating groups. In this 
presentation, we have described our search for the homomorphic images through the 
permutation progenitor 2*!° : (Ds x 3) and constuction of a monomial representation 
through the group 2° : 3. We have constructed PGL(2,7) over 2° : 3 on 6 letters and 
L2(11) over 2? :3 on 8 letters. We have also given our construction of S5 x 2 and L2(25) as 
homomorphic images of the monomial progenitors 3*3 :, Dg and S*® : Ss. In addition, 
we have described as to how to solve the extension problem for finite groups through 
the example of the group (4 x 22) : Ag. We note that the symmetric presentations and 


constructions given in this presentation are original, to the best of our knowledge. 
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Introduction 


In Chapter 1, we will discuss progenitors. We begin by listing definitions and 
theorems relevant to progenitors. In this chapter, we construct permutation progeni- 
tors of free products. We utilize the computing program MAGMA to very the success of 
a built progenitor. We will also find the homomorphic images of progenitors factored 
by given relations. 

In Chapter 2, we will discuss a monomial progenitor. The monomial progen- 
itor will be constructed using a process known as the "lifting process." This process 
grants us the ability to produce a monomial matrix to obtain a new control group on 
which our monomial progenitor will be constructed from. 

In Chapter 3, we describe the process to solve the extension problem for fi- 
nite groups through examples. 

In Chapter 4, we construct the double coset enumeration of a group G over a 


transitive group N of finite permutations and monomial progenitors. 


Chapter 1 


Preliminaries 


1.1 Definitions and Theorems 


Definition 1.1.1. (Permutation) If X is a nonempty set, a permutation is the bijective 


mapping a: X — X. [Rot95] 


Definition 1.1.2. (Disjoint) Two permutations a, B € Sx are disjoint if every x moved 
by one is fixed by the other. In symbols, if a(a) 4 a, then B(a) = a, and if a(b) = b, then 
B(b) # b. [Rot95] 


Theorem 1.1.3. Every permutation a € Sy, is either a cycle or a product of disjoint cycles. 


[Rot95] 


Definition 1.1.4. (Semigroup) A semigroup (G, *) is a nonempty set G equipped with 


an associative operation «. [Rot95] 


Definition 1.1.5. (Symmetric Group) The symmetric group, denoted Sj, is the set of all 
permutations of the nonempty set X = {1,2,...,n}. Sy is a group of order n! on n letters. 


[Rot95] 


Definition 1.1.6. (Group). A group is a semigroup G containing an element e such that 
@Mexa=a=a*e forallacG 


(ii) for every a€ G, there is an element be G witha» b=e=b* a. [Rot95] 


Definition 1.1.7. (Order) If G is a group, then the order of G, dentoted |G\, is the number 


of elements in G. [Rot95] 


Definition 1.1.8. (Free Group) If X is a subset of a group F, then F is a free group with 
basis X if, for every group G and every function f : X — G, there exists a unique homo- 


morphism ~p: F > G extending f. [Rot95] 


Definition 1.1.9. (Presentation) Let X be a set and let A be a family of words on X. A 
group G has generators X and relations A ifG = F/R, where F is the free group with basis 
X and R is the normal subgroup of F generated by A. The ordered pair (X|A) is called a 


presentation of G. [Rot95] 


Definition 1.1.10. (Progenitor) A progenitor is a semi-direct product of the following 
form: P= 2*":N= {nw| 2 € N, and wis a word in the t;}, where 2*" denotes a free product 


of n copies of a cyclic group of order 2 generated by involutions t; for i=1,...,.n; and N is 


a transitive permutation group of degree n which acts on the free product by permuting 


the involutory generators. [Curt96] 


Lemma 1.1.11. (Factoring Lemma) (Know as the Grindstaff Lemma) Factoring the pro- 


genitor m*" :N by (tj, tj) for 1 < i< j <n gives the group m” :N.[Grind15] 


1.2 Permutation Progenitor 2*'° : (D; x 3) 


We will write the progenitor generated by x ~ (1,2,3,4,5,6,7,8,9, 10, 11, 12, 13, 14, 15) 
and y ~ (1,4) (2,8) (3, 12) (6,9) (7, 13)(11, 14). The presentation of Nis < x, y | SGP xt yxy >. 
We use MAGMA to find the permutation that stabilizes 1 in N, denoted by N!. The per- 
mutation that stabilizes 1 is (2,5) (3,9) (4, 13) (7, 10) (8, 14) 
(12,15). We use our Schreier System to find the word that corresponds to the permu- 
tation (2,5) (3,9) (4, 13)(7, 10) (8, 14)(12,15) which is y*. In order to complete our pro- 
genitor of G, we add the stabilizer of 1 in N to the presentation. We also add 7” to 
the presentation since our tis are of order 2. Thus the progenitor of G =< x,y,t | 
y’,x *yxy, t*,(t, y*) >. In order to verify the progenitor, we must re-write our presen- 
tation of N in terms of the stabiliser and orbits of the stabiliser of N!. The orbits of N! 
are {1}, {6}, {11}, {2,5}, {3, 9}, {4, 13}, {7, 10}, {8, 14}, and {12, 15}. We can verify our progen- 
itor in MAGMA by applying the Grindstaff Lemma on the following code: G< x, y, tf >:= 
Group<x,y, tly?,xteyexey, 0, (ty), (t,0°),(t,0° ),(t,0), (60°), (t,07), (60°), (t,t), 
(ne ys 
#G; 
Our progenitor G is infinite. In order to find a finite presentation, we must factor G by 


relations. 


1.2.1 Writing First Order Relations 


We can compute all the possible relations of G by computing the orbits of the 


centralizer. In order to achieve this, we must find identify the conjugacy classes of N. 


Conjugacy Classes of N 
Class Representative of Class ea 
elements 
in the class 
Ci e 
Co Daa (1, 13) (3, 6) (4, 10) (5, 14) (8, 11) (9, 15) 
C3 (xy)? = (1,6, 11)(2,7, 12)(3,8, 13) (4,9, 14)(5, 10, 15) 
C4 (yard)? = (1, 11,6) (2, 12, 7)(3, 13, 8) (4, 14, 9) (5, 15, 10) 
C5 x? = (1,4,7, 10, 13) (2,5, 8, 11, 14) (3, 6,9, 12, 15) 
Ces x? yxy = (1,7, 13,4, 10) (2,8, 14,5, 11)(3,9, 15,6, 12) 
C7 xy = (1,8,6, 13, 11,3)(2, 12, 7)(4,5,9, 10, 14, 15) 
Cg yest = (1,3,11,13,6,8) (2,7, 12)(4, 15, 14, 10,9, 5) 
Cg x = (1,2,3,4,5,6,7,8,9, 10,11, 12,13, 14, 15) 
Cio x? = (1,3,5,7,9, 11,13, 15,2, 4, 6,8, 10, 12, 14) 
Ci yx7y = (1,8, 15,7, 14,6, 13,5, 12,4, 11,3, 10,2,9) 
C2 yx ly = (1,12,8,4,15,11,7,3, 14, 10,6, 2, 13,9, 5) 


Table 1.1: Conjugacy Classes 2*!° : (Ds x 3) 


Now that we found the conjugacy classes and have identified the represen- 
tative for each class, we proceed to find the centraliser and orbits of the centraliser of 


each class. 


Orbits of Centraliser(N, Rep) 


Class Representative Centraliser(N, Rep) Orbits of Centraliser(N, Rep) 
{2, 12,7}, {1, 13, 11,8, 6, 3}, {4, 10, 14,5, 9, 15} 
CG ne < (1, 13)(3,6)(4, 10) 
(5, 14)(8, 11)(9, 15) > 
C3 (xy)? sete te) {1,2,4,3, 8,5, 12, 9,6, 13, 10,7, 14, 11, 15} 
(3, 8, 13) (4,9, 14) (5, 10, 15) > 
C4 (yx7})2 SUL ONe 2a) {1,2,4,3, 8,5, 12,9, 6, 13, 10,7, 14, 11, 15} 
(3, 13, 8)(4, 14, 9) (5, 15, 10) > 
Cs x3 < (1,4,7,10,13)(2,5,8,11,14) 4 147, 14,6,10,2,9, 13,5, 12,8, 15,3} 
(3,6,9, 12,15) > 
C5 x? yxy < (1,7,13,4,10)(2,8,145,1) 9 7 14 13 9,6,4,8,12,10,14,3,5,9, 15} 
(3,9, 15,6, 12) > 
CG Pe < (1,8,6, 13, 11,3) (2, 12,7) {2,12,7}, 
(4,5,9, 10, 14, 15) > {1, 13,8, 11, 6,3}, 
{4, 10,5, 14,9, 15} 
& ea < (1,3, 11, 13, 6,8) 2,7, 12, 
(2,7, 12)(4, 15, 14, 10,9,5) > {1, 13,3, 6, 11, 8}, 
{4, 10, 15,9, 14,5} 
Cg x Se 504.08, {1,2,3,4, 5, 6, 7,8, 9, 10, 11, 12, 13, 14, 15} 
9,10, 11,12, 13,14, 15) > 
Cho x2 SUR eitee EhlS, {1,3,5,7,9,11, 13, 15, 2,4, 6, 8, 10, 12, 14} 
15,2, 4, 6,8, 10, 12, 14) > 
Ci yx? y SUS ote B18; {1,8, 15,7, 14, 6, 13, 5, 12, 4,11, 3, 10, 2,9} 
12,4, 11,3, 10,2,9) > 
Cie yxoly Se Ss toh {1, 12,8, 4, 15, 11,7, 3, 14, 10,6, 2, 13, 9,5} 


7,3, 14, 10,6,2,13,9,5) > 


Table 1.2: Orbits of Centraliser 2*!° : (Ds x 3) 


From the orbits of the centraliser, we obtain the following first order relations: 


First Order Relation (N, Rep) 


Class Relations 

Co x2yxt*,x2yxt,x2yxt™, 
C3 (xy)*t, 

Cy yx Yt 

Cs ae 

Ce x? yxy t, 

C7 xyt®,xyt,xyt™ , 

G yx he, yxlt, yx le, 
Cy Xt, 

Cio PE 

Cu yx*yt, 

Cie yx"*yt 


Table 1.3: First Order Relations 2*!° : (Ds x 3) 


Now we add the first order relations to the progenitor to obtain a 
homomorphic image of G. 

G=<x,y, tly, x4yxy, 0, (ty, (tt), (t,t), (£0), (t,t), 
(t,t), (t,t), (t, 07), (t, 0°), (x2 yxt)%, (x2 yx), (x2 yx )°, 
(xy)? 4, (yx 20%, OS, OP yxyn§, (xyt*)", (xyo! (xyt® )/, 
(yx), (yx! (yx), (x0), (x2.0)°, (yx 2 yt)?, (yx! yt)4 > 


00000000000000000 983040 


00000000000000005 160 
0000000000000000648 

0000000000000000 10320 
0000000000000000 1248 


0000000000000000 15 491520 


1.3 Permutation Progenitor 2*'° : (D3 x 5) 


We will write the presentation for the progenitor of the Transitive Group 15. 
Let N be the subgroup generated by x ~ (1,2,3,4,5,6,7,8,9, 10,11, 12,13, 14,15) and y ~ 
(1, 11) (2,7) (4, 14) (5, 10) (8, 13). The presentation of the subgroup Nis < x, y| y*,x-tyx"ly>. 
We will let ¢ ~ f,, this means that t commutes with the stabiliser of 1 in N. We use 
MAGMA to find the permutation that stabilizes 1 in N. The permutation that stabi- 
lizes 1 is (2, 12)(3,8)(5, 15) (6, 11)(9, 14). We apply the Schreier System in MAGMA. The 
Schreier System will produce the word corresponding to its permutation representa- 
tion. The word corresponding to the permutation (2, 12) (3,8) (5, 15)(6,11)(9, 14) is y*. 
We add the y* to the presentation of N and obtain < x, y, tly’, x 4yx7!y, y*, t?, (t, y%) >. 
We proceed to find the orbits of the stabilizer of 1. The orbits of the stabilizer are 
{1}, {4}, {7}, {10}, {13}, {2, 12}, {3, 8}, {5, 15}, {6,11}, and {9,14}. We make ¢ commute with 
the orbits of the stabilizer. We add the each to the progenitor to obtain the presentation 
Ga<xy, tly xtyx ty, 2679, (68), 6), (0° 9, (607,67, 60), (607), 
(t,t7), (t, 2°") >. 
The progenitor is infinite. In order to make it progenitor finite, we factor the progenitor 


by relations. 


1.3.1 First Order Relations 


10 


We can compute all the possible first order relations by computing all the 


orbits of the centralizes of the conjugacy classes of N. Let’s find the classes of N. 


Class Representative of Class # of elements in the class 
Cy e 1 
Co y* = (2, 12) (8, 8) (5, 15) (6, 11) (9, 14) 3 
C3 xyxly= (1,6, 11) (2, 7, 12)(3, 8, 13) (4,9, 14) (5, 10, 15) 2 
C4 x? = (1,4,7, 10, 13) (2,5, 8, 11, 14) (3, 6,9, 12, 15) 1 
Cs x3 = (1,13, 10,7,4)(2, 14, 11,8, 5)(3, 15, 12, 9,6) 1 
Cg xyx-*y = (2,11,5, 14,8)(3, 12,6, 15,9) 1 
C7 = -x*yx7!y = (1,7, 13,4, 10)(2, 8, 14, 5, 11)(3, 9, 15, 6, 12) 1 
Cg xy = (2,3,14, 15,11, 12,8,9,5,6) 3 
Cy x y= (1,4, 7, 10, 13) (2, 15, 8,6, 14, 12,5,3, 11,9) 3 
Cio Ve = (1,13, 10,7, 4) (2,9, 11,3,5, 12, 14,6, 8, 15) 3 
Cy yx! = (1,10,4, 13, 7) (2,6, 5,9, 8, 12,11, 15, 14,3) 3 
Ci2 x = (1,2,3,4,5,6, 7, 8,9, 10,11, 12,13, 14,15) 2 
C3 x? = (1,3,5,7,9, 11, 13, 15, 2,4, 6, 8, 10, 12, 14) 2 
Cy4 yx ly= (1,5,9, 13, 2,6, 10, 14,3, 7, 11, 15,4, 8, 12) 2 
Cy5 x = (1,14, 12, 10,8, 6, 4, 2, 15, 13, 11, 9,7, 5,3) Z 


Table 1.4: Conjugacy Classes 2*!° : (D3 x 5) 


11 


Now that we have listed the conjugacy classes of N, we will find the cen- 


traliser of each class. In addition, we wil find the orbits of each centraliser. 


12 


Class Representative Centraliser(N, Rep) Orbits of Centraliser(N, Rep) 
C2 y* < (2, 12)(3, 8) (5, 15) (6, 11)(9, 14) > Udo DOG 
{2,12,14,9,11,6,8,3,5, 15} 
= < (1,6, 11) (2,7, 12) (3, 8,13 1,6, 13,11,3,10,8, 
C3 xyx ly ( )( )( ) { 
(4,9, 14)(5, 10,15) > 15,7,5, 12,4, 2,9, 14} 
{1, 2, 11, 3, 7, 12, 4, 8, 13, 5, 14, 9, 6, 10, 15 } 
Ca oo < (1,4, 7, 10, 13) (2,5, 8, 11, 14) 
(3,6,9, 12,15) > 
{1, 2,11, 3, 7, 12, 4, 8, 13, 5, 14, 9, 6, 10, 15} 
Cs x3 < (1,13, 10,7, 4)(2, 14, 11,8, 5) 
(3,15, 12,9,6) > 
{1, 2, 11, 3, 7, 12, 4, 8, 13, 5, 14, 9, 6, 10, 15 } 
Ce xyx*y < (2, 11,5, 14,8) (3, 12,6, 15,9) > 
{1, 2, 11, 3, 7, 12, 4, 8, 13, 5, 14, 9, 6, 10, 15} 
G 2-1 < (1,7, 13,4, 10) 
xvyx y 
(2,8, 14,5, 11)(8,9, 15,6, 12) > 
Cg xy < (2,3,14,15,11,12,8,9,5,6) > G13; 4, 104) 
{2, 12, 3, 8, 14, 9, 15, 5, 11, 6} 
2 < , , , 
Co re 2y (1,4, 7, 10, 13) {1, 4, 7, 10, 13} 
(2,15, 8,6, 14, 12,5,3,11,9) > {2, 12, 15, 5, 8, 3, 6, 11, 14,9} 
Cio yx2 < (1,13, 10,7, 4) {1, 13, 10, 7, 4}, 
(2,9, 11,3,5, 12, 14, 6,8, 15) > {2, 12,9, 14, 11, 6, 3, 8,5, 15} 
Ci yx < (1, 10,4, 13,7) {1, 10, 4, 13, 7}, 
(2,6,5,9,8,12,11,15,14,3) > {2, 12,6, 11,5, 15, 9, 14, 8,3} 
oe . < (1,2,3,4,5,6, 7,8, {1, 2, 3, 4,5, 6, 7, 8, 
9,10,11,12,13,14,15) > 9,10, 11, 12, 13, 14, 15} 
Cis yo < (1,3,5,7,9, 11,13, {1, 3,5, 7,9, 11, 13, 
15, 2,4, 6,8, 10, 12,14) > 15, 2, 4, 6, 8, 10, 12, 14} 
oa < (1,5,9, 13, 2,6, 10, 1, 5, 9, 13, 2, 6, 10, 
Ci4 yx ly ( { 
14,3,7,11,15,4,8, 12) > 14, 3, 7, 11, 15, 4, 8, 12 } 
Cis x2 < (1,14, 12, 10, 8,6, 4, 2, {1, 14, 12, 10, 8, 6, 4, 2, 


15, 13,11,9,7,5,3) > 


15, 13, 11,9, 7,5, 3} 


Table 1.5: Orbits of Centraliser 2*!° : (D3 x 5) 
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From the orbits of the centraliser, we obtain the following first order relations: 


First Order Relations (N, Rep) 


Class Relations 

C2 (y*t)* 

C3 (xyx-lyt®)? 
C, (03 £xV) 

eo (x73 yx 'y4 
Co (xyx yt")? 
C7 Gye yey! 
Cg (xyt?*)§ 

Cy Cae a 
Cio (are) 
Ci (yx eye 
Cie ai) 

Cs (x2 pee! 
Ci4 (yx! ytY)™ 
Ci5 ee 


Table 1.6: First Order Relations 2*!° : (D3 x 5) 


We add the first order relations to the progenitor to obtain a homomorphic 
image of G, 
GSexn yy ye IF EP FO Oye VP EPS eI yx tye, 


(x2 yx yeh, (xyt¥*)8, (x2 yt)", (yx? 24, (yx eye YS, (x )E, (x2 PIE) (yxy ey™, 
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(x2 98)" > 


1.4 Permutation Progenitor 2*”! : (4 x 2: S3) 


In this section we will write the presentation for the progenitor 2**4 : (4 x 2): 
S3 N is generated by x ~ (1,9) (2, 10) (3, 11) (4, 12) (5, 13) (6, 14) (7, 15) (8, 16) (17, 23) (18, 21) (20, 24), 
y ~ (1,15, 17) (2, 13, 18) (3, 11, 19) (4, 16, 20) (5, 10, 21) (6, 14, 22) (7,9, 23) (8, 12,24), and 


Zz ~ (1,2,4,5) (3, 8,6, 7) (9, 16, 12, 15)(10, 11, 13, 14) (17, 22, 20, 19) (18, 24, 21, 23). The presen- 


tation of N =< x, y,z|x*, y3,z4,(y!x)?,z27y l2y (ya's, ztytztylzy lS 

The notation 2**4, tells us we have 24 t's of order 2. We will let f ~ 1, this 
means that f will commute with the stabilizer of 1 in N. We use MAGMA to find the per- 
mutations that stabilize 1 in N. The permututation that stabilizes 1 is (2, 6) (3,5) (7,8) (9, 21) 
(10, 17) (11, 23) (12, 18) (13, 20) (14, 24) (15, 22) (16, 19). 
We use our Schreier System to determine the permutation is xz~!y~!. We add xz"! y~! 


to our presentation of N to get the presentation of 2**4. Thus our progenitor is G =< 


x,y, 21x2, 3,24, (yo! x)4, 22 y lzty (yea? cty te typ lzy7, 2, (4x27 y7) >. Our 


progenitor G is infinite. In order to make it finite we factor by relations. 


1.4.1 Writing the First Order Relations 


First order relations are written in the form (1%)" =1, where ae Nand wisa 
work in the t;s. We can compute all the possible relations by computing the orbits of 


the centralizers of the Conjugacy Classes of N. Let’s find the classes of N. 
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Conjugacy Classes of N 
. # of elements 
Class Representative of Class 
in the class 
Cy e 1 
Cz z* = (1,4) (2, 5)(3, 6) (7,8) (9, 12) (10, 13) (11, 14) (15, 16) (17, 20) (18, 21) (19, 22) (23, 24) 1 
C3 zxz = (1,11)(2,15)(3, 12) (4, 14)(5, 16) (6, 9) (7, 13) (8, 10) (17, 20) (18, 19) (21, 22) 12 
C4 y = (1,15, 17)(2, 13, 18) (3, 11, 19) (4, 16, 20) (5, 10, 21) (6, 14, 22)(7,9, 23) (8, 12,24) 8 
Cs z= (1,2,4,5)(3, 8,6, 7)(9, 16, 12, 15)(10, 11, 13, 14) (17, 22, 20, 19) (18, 24, 21, 23) 6 
Ce yz= (1,9, 18,4, 12,21) (2, 14, 20,5, 11,17) (3, 13, 24, 6, 10, 23)(7, 16, 19, 8, 15, 22) 8 
C7 zx = (1,10,3, 16,4, 13,6, 15) (2, 12,7, 11,5,9,8, 14)(17, 22, 24, 18, 20, 19, 23,21) 6 
Cg zx =(1,13,3,15,4, 10,6, 16)(2,9,7, 14,5, 12,8, 11)(17, 19, 24, 21, 20, 22, 23, 18) 6 


Table 1.7: Conjugacy Classes of 2**4 : (4 x 2: S3) 


Next we must find the centraliser of each class representative. Once we have 


found the centraliser of each class, we must then find the orbit of each centraliser. 
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Orbits of Centraliser(N,Rep) 


Class Representative Centraliser(N,Rep) Orbits of Centraliser(V,Rep) 
Cy e 1 
<(1, 4)(2, 5) (3, 6)(7, 8)(9, 12) (10, 13) 
C 2 {1, 9, 15, 2, 23, 16, 7, 17, 
2 é (11, 14) (15, 16) (17, 20) (18,21) (19, 22) (23, 24)> 
10, 13, 4, 18, 8, 20, 12, 3, 
22, 21, 11, 5, 14, 24, 6, 19} 
{17, 20 },{ 23, 24}, 
<(1, 11)(2, 15)(8, 12)(4, 14) (5, 16) 
{1, 11,4, 14}, 
C3 EXE (6, 9)(7, 13)(8, 10) (17, 20) (18,19) (21, 22)> 
{2, 15, 5, 16}, 
{3, 12, 6, 9}, 
{7, 13, 8, 10}, 
{ 18, 19, 21, 22} 
<(1, 15, 17)(2, 13, 18)(8, 11, 19) {1, 15, 4, 17, 16, 20}, 
C4 J (4, 16, 20)(5, 10, 21) (6, 14,22)(7, 9, 23)(8, 12,24)> {2 13,5, 18, 10, 21}, 
{3, 11, 6, 19, 14, 22}, 
{7, 9, 8, 23, 12, 24} 
<(1, 2, 4, 5)(3, 8, 6, 7) {1, 2, 20, 4, 19, 5, 17, 22}, 
C5 z 
(9, 16, 12, 15)(10, 11, 13, 14) {3, 8, 18, 6, 24, 7, 21, 23}, 
(17, 22, 20,19)(18, 24, 21, 23)> {9, 16, 13, 12, 14, 15, 10, 11} 
<(1, 9, 18, 4, 12, 21)(2, 14, 20, 5, 11, 17) {1, 9, 18, 4, 12, 21}, 
Ce yz (3, 13, 24, 6, 10, 23)(7,16, 19, 8, 15, 22)> {2, 14, 20, 5, 11, 17}, 
{3, 13, 24, 6, 10, 23 }, 
{7, 16, 19, 8, 15, 22 } 
<(1, 10, 3, 16, 4, 13, 6, 15)(2, 12, 7, 11, 5, 9, 8, 14) 
{1, 10, 3, 16, 4, 13, 6, 15}, 
C7 zx (17, 22, 24,18, 20, 19, 23, 21)> 
{2, 12, 7,11, 5, 9, 8, 14}, 
{ 17, 22, 24, 18, 20, 19, 23, 21} 
<(1, 13, 3, 15, 4, 10, 6, 16)(2, 9, 7, 14, 5, 12, 8, 11) 
-] {1, 13, 3, 15, 4, 10, 6, 16}, 
Cg Zk 


(17, 19, 24,21, 20, 22, 23, 18)> 
{2, 9, 7, 14, 5, 12, 8, 11}, 


{17, 19, 24, 21, 20, 22, 23, 18} 


Table 1.8: Orbits of Centraliser 2*”4 : (4 x 2: S3) 
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From the orbits of the centraliser, we obtained the first order relations as 


shown in the table above. 


Relations (N,Rep) 


Class Relations 

C2 “t 

C3 zxzt’ , zxzt¥*’, zxzt, zxzt®, zxzt*Y %, zxzt™ *, zxzt*%, 
Cy yt, yt®, yey 7, yt 

Cs zt,zt°Y %,zt¥, 

Cg yet’, yztrY ', yet*y, 

Cr zxt, zxt®,zxtY, 

Cg zlyxt,zlxt?,2 xt 


Table 1.9: First Order Relations 2*”* : (4 x 2: S3) 


Now we add our first order relations to our progenitor to obtain a homomor- 


phic image of G, 


Cece AG Oey eNOe ee ee yey Oe Deer), 


(Zxzrye,(exzt)4, (wxzk?)?, (2x20 7)! (zee 8 ext ior OF, 
(ye)! (20), (ZY), (20), (yze)?, (vat), (yet), (yat*)S, (ext)! (2xt?)", 


-1 -1 
(zxtY )”¥, (2 xt@, (2! xt), (2 xtY )B> 


if #G gt 48 then a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,al,a2,a3, #G; 
end if; end for; 
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Chapter 2 


Monomial Progenitors 


2.1 Preliminary 


Definition 2.1.1. (Formula for Induced Character) 


n 
esia=— > =),a=1,2,3,..,m 


a@ weCanH 


SS 


. Definition 1.1.12. (Character) Let A(x) = (a;;(x)) be a matrix representation of G of 


degree m. We consider the characteristic polynomial of A(x), namely 


A-ay(x) A-aj2(x) .. A-aAim(x) 

A-d2\(xX)  A-ap2(x) .. A-Am(x) 
det(AI—- A(x)) = 

A-Am\(X) A-Am2(xX) .. A-Amm(x) 


This is a polynomial of degree m in A, with the coefficient of -A'~! is 
P(X) = Ay (%) + A22(X) + .. + Amm(X) 
It is customary to call the right-hand side of this equation the trace of A(x), abbreviated 


to tr A(x), so that p(x) = tr A(x) 
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We regard (p(x) as a function on G with values in field K, and we call it the character of 


A(x).{Led77] 


Theorem 2.1.2. The number of irreducible characters of G is equal to the number of con- 


jugacy classes of G.[Led77] 


Definition 2.1.3. (Degree of a Character) The sum of squares of the degrees of the dis- 
tinct irreducible characters of G is equal to |G|. The degree of a character y is y(1). Note 


that a character whose degree is 1 is called a linear character. [Led77] 


Definition 2.1.4. (Lifting Process) Let N be a normal subgroup of G and suppose that 
Ag(Nx) is a representation of degree m of the group G/N. Then A(x) = Ao(NXx) defines a 
representation of G/N lifted from G/N. If ~o(Nx) is a character of Ag(Nx), then p(x) = 
(o(NXx) is the lifted character of A(x). Also, ifue N, then A(u) = Im,p(u) = m= (I). 


The lifting process preserves irreducibility. [Led77] 


Definition 2.1.5. (Induced Character) The character of A(x), which is called the in- 
duced character of ¢, will be dentoted by p°. Thus, b° = trA(x) =) Bia (t.xt;~!).[Led77] 
Definition 2.1.6. (Formula for Induced Character) 


n 
gsin=— >) =),a=1,2,3,..,m 
he weCynH 


2.2 AMonomial Progenitor for 2° : 3 


G=23:3is generated by xx = (3,6) and yy = (1,3,5)(2,4,6) 
The conjugacy classes of the group G are C; = ID(G) 

Cz = (1,4) (2,5) (3,6) 

C3 = (1,4), (2,5), (3,6) 

C4 = (1,4) (3, 6), (2, 5) (3, 6), (1, 4) (2, 5) 

Cs = (1,3, 5)(2,6,4), (1,6, 5) (2, 4, 3), (1,3, 2) (4,6, 5), (1,6, 2)(3, 5, 4) 

Ce = (1,5,3) (2,6, 4), (1, 5, 6) (2,3, 4), (1, 2, 6) (3, 4, 5) (1, 2, 3) (4, 5, 6) 

C7 = (1,6,2,4,3,5), (1,3, 5,4, 6, 2), (1,3, 2, 4, 6, 5), (1,6, 5, 4,3, 2) 


Cg = (1,5,3,4,2,6), (1,5,6,4,2,3)(1,2,6,4,5,3), (1,2,3,4,5,6) 


Let us consider the subgroup H of G, 


H = Id(G), (1,4)(2,5), (2,5) (3, 6), (1,4)(3,6), (2,5), (1,4), (3,6), (1, 4) (2,5)(3, 6) 


The conjugacy classes of H are 
D, = Id(G) 

D2 = (1,4) (2,5) 

D3 = (2,5) (3,6) 

D4 = (1,4)(3,6) 

Ds = (2,5) 

De = (1,4) 

D7 = (3,6) 


Dg = (1,4) (2,5) (3,6) 
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Class D1 D2 D3 DA D5 D6 D7 D8 
Size 1 1 1 1 1 1 1 1 
Representative | Id(G) (1,4)(2,5)  (2,5)(3,6) ~—(1,4)(3,6) (2,5) (1,4) (3,6) = (1, 4)(2, 5) (3, 6) 
ce) 1 -1 -1 1 -1 1 1 -1 


In the table below, we have the characters ¢ of G corresponding to the subgroup H. 


Class Cl C2 C3 C4 C5 C6 
Size 1 1 3 3 4 4 
Representative | Jd(G) (1, 4)(2,5)(3,6) (1,4)—-(1,4)(3,6) (1,3, 5)(2,6,4) (1,5, 3) (2,6, 4) 
pe 3 3 1 =A) 0 0 

Class C7 C8 
Size 4 4 
Representative | (1,6,2,4,3,5) (1,5,3,4,2,6) 
pe 0 0 


a) We want to induce the ¢ of H up to G to obtain the character f°. 


Gin — IGl _ 24 _ 
da= Tig WE HNCa (w), where n = ial = 3 => 


pe = Ti LweHaG, p(w) 


So, pF = 2(p(1)) =3(1) =3 


Oe = Ie Le weHnG p(w) 


So, p$ = $1, 4) (2,5) B,6)) = 3(-1) =-3 


pe = ie Le weHncy p(w) 


So, PF = 3(6(1,4) + (2,5) + $B,6)) =1(1+-14+1)=1 


bf = Lwennc, Pw) 


So, HF = (P11, 4) 3, 6) + (2,5)(3, 6) + (1, 4)(2,5)) = 10 +-1+-1) =-1 


O§ =  Lweunc, Pw) 


So, OY = $(H(0)) = $(0) =0 


pe = Tig DWEHACe d(w) 


So, H§ = $(P(0)) = $0) =0 


pe = iB LweHnc p(w) 


So, pf = $(P(0)) = $(0) =0 
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09 = PD wennc, Pw) 


So, Pf = $(p(0)) = (0) =0 


b) Show the monomial representation has the generators 
1 0 O 0 1 0 
A(xx)=]0 1 0 | andAlyy)=]0 0 1 


0 0 -l 1 0 0 


G= HeUAH(1,3,5)(2,4,6), H(1,5,3)(2,6,4). 


Let =e, t= (1,3, 5)(2,4,6), f3 = (1,5, 3) (2,6, 4) 


Plxty') Plhxty') P(axtz") 
A(xxX) = | (txtp') O(txty!) P(textz') 


Pltsxty') Pltgxtz') P(tgxtz") 


| (exe) o(ex(1, 5,3) (2,6, 4)) (ex(1, 3,5) (2,4, 6)) 
a es &((1,3, 5) (2, 4, 6)x(1, 5,3) (2,6, 4)) (1,3, 5) (2, 4, 6) x(1, 3, 5) (2, 4, 6)) 


P((1,5,3)(2,6,4)xe) ((1,5,3)(2,6,4)x(1,5,3)(2,6,4)) ((1,5,3) (2,6, 4) x(1,3,5)(1,3,5) (2,4, 6)) 


((3, 6) $((1,5,3,4,2,6)) ((1,3,2,4,6,5)) 


= | P((1,6,2,4,3,5)) p((1,4,)) ((1,2,6,4,5,3)) 


$((1,5,6,4,2,3)) ((1,3,5,4,6,2)) ((2,5)) 
F 0 0 | 
=]0 1 O 


| 
| 


24 


payty') Playty') playtz') 
AVY) =|O(pyt)) P(pyt') b(pytz') 
Pltyt,') bltyty') P(tsytz") 
pleye) p(ey(1, 5,3) (2,6, 4)) p(ey(1,3, 5) (2,4,6)) 
= | P(,3,5)(2,4,6)ye) ((1,3,5)(2,4,6) y(1, 5,3) (2, 6, 4)) ((1,3,5)(2,4,6) y(1,3, 5) (2,4, 6) 


P((1,5,3)(2,6,4) ye) ((1,5,3)(2,6,4) y(1,5,3)(2,6,4)) ((1,5,3) (2,6, 4) (1,3, 5) (1,3, 5) (2, 4, 6)) 


((1,3,5)(2,4,6)) ((e)) (C1, 5,3) (2,6, 4)) 
= | (1,5, 3) (2,6, 4)) ((1,3,5)(2,4,6)) p((e)) 
((e)) $((1,5,3)(1,5,3)(2,6,4)) ((1,3,5)(2,4,6)) 
0 1 0 
=]0 0 1 
1 0 0 


(c) Give a permutation representation of A(xx) and A(yy) of the monomial 


representation of part (b). 


=]/0 1 O| where aj = 1, d2 = 1, and az3 = 2. 


0 0 2 


This give us, 
hh, 
to > fa, 


and ft3 — te 


i 2.3. 4 5. 6 
it “Be te GR 
ee ee oe | 
fb be eB 
TDi Bi A> abe XB 


Therefore, A(xx) = (3,6). 
0 1 0 


A(yy)=]0 0 1] where a2 =1, a3 =1, and a3) = 1. 


10 0 
This gives us, 


ti > te, 
to > f3 


3 > h 


12) Bee. AG 6 
ht bb & 8 
He Te Made dee he 
Bg SE fa 
2. Ae 1B i) GA 
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Therefore, A(yy) = (1,2,3)(4,5,6). 


(d) Give the presentation of the monomial progenitor 3*° :» (2 : 3). 
A presentation for S4 is < x, y | x’, ier (xy)® >. We need to find the Normaliser{t, t7}. 
The Stabiliser(N, {1,4} = (3,6), (2,5), (1,4). This means that t commutes with all 3. 


Thus, our presentation is < x, y, f| x’, y>, (xy)®, (x, y)?, (t,x), (t, yxy), 09 = t? >. 
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Chapter 3 


Ismorphism Types 


3.1 Preliminaries 


Definition 3.1.1. (Abelian) A pair of elements a and b in a group commutes if a*b=b*a. 


A group is abelian if every pair of its elements commutes. [Rot95] 


Definition 3.1.2. (Homomorphism) Let (G,*) and (H,°) be groups. A function f:G= H is 


ahomomorphism if, for alla, be G, f(a*b) = f(a) ° f(b). [Rot95] 


Definition 3.1.3. (Isomorphism) An isomorphism is a homomorphism that is also a bi- 
jection. We say that G is isomorphic to H, denoted G=H, if there exists an isomorphism 


fG= H. [Rot95] 


Theorem 3.1.4. Let p be a prime. A group G of order p” is cyclic if and only if it is an 


abelian group having a unique subgroup of order p. [Rot95] 
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Definition 3.1.5. (normal subgroup) A subgroup KSG is a normal subgroup, denoted 


by kAlG, if gK g~|=K for every geG. [Rot95] 


Theorem 3.1.6. (First Isomorphism Theorem) Let f? G— H be a homomorphism with 


kernal K. Then K is a normal subgroup of G and G/K=im(f). [Rot95] 


Theorem 3.1.7. (Second Isomorphism Theorem) Let N and T be subgroups of G with 


Nnormal. Then NNT is normal in T and T/(NNT)ZNTIN. [Rot95] 


Theorem 3.1.8. (Third Isomorphism Theorem) Let K< H<G, where both K and H are 
normal subgroups of G. Then H/K is a normal subgroup of G/K and (G/K)(H/K)=G/H. 


[Rot95] 


Theorem 3.1.9. (Correspondence Theorem) Let KG and let v:G— GIK be the natural 
map. Then S > v(S)=S/K is a bi-jection from the family of all those subgroups S of G 
which contain K to the family of all the subgroups of G/K. Moreover, if we denote S/K by 
S*, then: (i) T<S if and only if T* < S*, and then [S:T]=[S* :T* J; and (ii) T<1S if and only 


if T* <S*, and then S/T = S*/T*. [Rot95] 


Definition 3.1.10. (maximal normal subgroup) A subgroup HsG is a maximal normal 


subgroup of G if there is no normal subgroup N of G with H< N<G. [Rot95] 


Definition 3.1.11. (simple) A group G41 is simple if it has no normal subgroups other 
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than G and itself: [Rot95] 


Definition 3.1.12. (direct product) If H and K are groups, then their direct product, 
denoted by Hx K, is the group with elements all ordered pairs (h,k), where he H and ke K, 
and with the operation (h,k)(h,k’)=(hh, kk’). [Rot95] 


Theorem 3.1.13. (Jordan-Holder Theorem) Every two composition series of a group G 
are equivalent. 

Suppose that the finite group G has two composition series 
G=Bo>B,>...> By, = {l} andG=Co>C) >... > Cm = {1}. Then n = m and the 
lists of composition factors for the two series are identical in the sense that if |H| < |G| 
and ®(H) = {i= 1: Bj_,/B; = H} and ¥(A) = {i = 1: Cj_1/C; = A} then ®(A) = P(A). 


[Rot95] 


Definition 3.1.14. (semi-direct product) A group G is a semi-direct product of K by Q, 
denoted by G=Kx Q, if K<iG and K has a complement Q; =Q. One also says that G splits 


over K. [Rot95] 


Definition 3.1.15. (Mixed-Extension) If G is an extension of an abelian group not equal 


to the center of G, then this is called a mixed extension. [Rot95] 


Definition 3.1.16.(normal subgroup in composition series) A normal subgroup N of 
a group G is called a maximal normal subgroup of G if 


(qaN#G 
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(b) whenever N < M<1G then either M= N or M+G. 
By the Correspondence Theorem, if N<1G and N # G then every normal subgroup of G/N 
corresponds to a normal subgroup of G containing N. So a normal subgroup N is maxi- 


mal ifand only if G/N is simple. 


Definition 3.1.17. (Composition series) Given a group G, a composition series for G of 
length n is a sequence of subgroups G=By > By > ---> By =1g such that 

(i) B; <1 By_; for i= 1,... ,n. 

(ii) Bj_-,/B; is simple for i=1,...,n. In particular, B; is a maximal normal subgroup of G 
and B;-) is simple. The (isomorphism classes of the) quotient groups B;/B;-\ are called 


composition factors of G. 


Example 3.1.18. 

S4 has the following composition series of length 4, where K is the Klein group 
{(1), (12) (34), (13) (24), (14) (23)}. 

S4 > Aq > K > {(12)(34)} > {1} 

We know that Aq <1 S4; the composition factor S4/ Aq = Co. 

We have seen that K <1 Aq; and Aqg/K = C3 

All subgroups of K are normal in K, because K is abelian. 

Both K/{(12)(34)} and {(12)(34)}/{1} are isomorphic to C2. 


So the composition factors of S4 are C2 (three times) and C3 (once). 
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3.2 Isomorphism Type 4? : 4 


Our goal is to find the Isomorphism type of the transitive group N on 8 letters. 
N is a group of order 64 and is generated by x ~ (2,6)(3,7) , y ~ (1,3)(4,8)(5,7), and 
Zz ~ (1,2,3,8)(4,5,6,7). The Normal Lattice of N is given below. 
NL[13] 


weed ” oe 


NL[10] NL[11] NL[12] 


i Order 32 x Order 32 Order 32 
NLS] NUS] NU? ue 


Order 16 Order 16 Order 16 


Order 8 Order 8 Order 8 


sy 


Order 4 


NL[2] 
Order 2 


NL{1} 
Order 1 


Figure 3.1: Normal Lattice of 4? : 4 


The largest normal abelian subgroup of N is NL[8], which is of order 16. From 


this we can conclude that NL[8] is isomorphic to Z2 x Z2 x Z2 x Z2, Za x Z2 x Zo, Lg x 
Z4 or Zig. We see that NL[8] has two generators of order 4, A ~ (2,8,6,4) and B ~ 
(1,3,5, 7) (2,8,6,4). Thus, NL[8] = 4x 4=4?. 

A presentation for NL[8] is given by < A, B| A*, B*,(AB) >. 
NL{8] is an abelian subgroup of order 16 and N is of order 64. If N has a normal sub- 
group of order 4, then N is a direct-product. However, N does not have a normal sub- 


group of order 4. Thus we can conclude that N is a semi-direct product of NL[8]. 
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By factoring N by NL[8] we obtain that N is an extension of NL[8] by N/ NL[8]. 
N/NL[8] is generated by C ~ (1,2,3,8)(4,5,6, 7). So N/ NL[8] = 
< C > which is of order 4. 


Now we conjugate the generators of NL[8] =< A,B > by C and compute A and B®. 


AC = (2,8,6 4) 12,38) (4,5,6,7) 


= (1,7,5,3) 1) 


= AB? 


Br =13,5,00 864 
= (1, 7, 5,3) (2, 8, 6,4) (3.2) 
= A’B° 
The presentation of N is < a, b,c| a’, b*, (ab), c+, a° = ab®, b° = a*b° >. Therefore, N is 


the semi-direct product of 4? : 4. 


3.3 Ismorphism Type (4 x 27) : S3 


Our goal is to find the Isomorphism type of the transitive group N on 14 
letters. N is a group of order 96 and is generated by w ~ (1,7)(3,9)(4,10)(6,12) x ~ 
(14, 7, 10)(2, 5,8, 11)(3,6,9, 12) y ~ (1,5,9) (2,6, 10) (3, 7, 11) (4,8, 12) and z ~ (1,5)(2, 10) (4, 8)(7, 11). 
The Normal Lattice of N is given by The largest normal abelian subgroup of N is NL[7] 
which is of order 16. From this we can conclude that NL[7] is isomorphic to Z2 x Z2 x 
Zo x Zo, Z4 x Zo x Zo, L4 x Z4 OF Zig. We see that NL[7] has one generators of order 
4 and three generators of order 2 A ~ (1,4,7,10)(2,5,8, 11)(3,6,9,12), B ~ (3,9)(6, 12), 


C ~ (1,7)(3, 9) (4, 10) (6, 12) and D ~ (1, 7) (2,8) (4, 10) (5, 11). However, I need to determine 
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NL[14] 
Po eee re 
NL{11] NL[13] NL[12] 
y Order 48 Order 48 Order 48 
NL[8] NL[9] NL[10} a NL[7] 
Order 24 Order 24 Order 24 Order 16 
NL(6] oe. NL[3] 
Order 12 Order 8 Order 4 
NL{4] NL[2] 
Order 4 Order 2 
NL{1] 


Figure 3.2: Normal Lattice of (4 x 27) : $3 


if all four generator are needed to generator NL[7] which is of order 16. We conclude 
that NL[7] is generated by ABC. Thus NL[7] = 4 x 2?. 

A presentation for NL[7] is given by < A,B, C | A*, B*, C?(A, B)(A, C)(B, C)) >. 
NL{7] is an abelian subgroup of order 16 and N is of order 96. If N has a normal sub- 
group of order 6, then N is a direct-product. However, N does not have a normal sub- 
group of order 6. Thus we can conclude that N is a semi-direct product of NL[7] by 
S3. 

By factoring N by NL[7] we obtain that N is an extension of NL[7] by N/ NL[7]. 
N/NL[7] is generated by D ~ (1,5,9) (42,6, 10)(3,7, 11) (4,8, 12) which is of order 3 and 
E ~ (1,5) (2, 10) (4, 8)(7, 11) which is of order 2. So N/ NL[7] =< D, E > which is of order 


6. 
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Now we conjugate the generators of NL[7] =< A,B,C > by D and E and compute 


A?,BY,C”, AF, BE, and CE. 
AP = (1, 4, 7. 10) (2, 5, 8, 11) (3, 6, 9, 12) (1,5,9) (2,6, 10) (3,7,11) (4,8, 12) 
= (1,4, 7, 10) (2, 5,8, 11) (3, 6,9, 12) 
=A 
BP = (3, 9) (6, 12) (159) 2,6,10) (3,7,11) (4,8, 12) 


= (7, 1)(4, 10) 


=BxC 


cP ie (dl, 7) (3, 9) (4, 10) (6, 12)45,9) (2,6, 10) (3,7,11)(4,8,12) 
= (1,7) (2,8)(4, 10)(5, 11) 
= A**xB 
A® = (1,4,7, 10)(2,5,8, 11)(3,6,9, 12)¢@104.8)(7,1) 
= (1,4,7, 10) (2,5, 8, 11) (3, 6,9, 12) 
=A 
BE = (3,9) (6, 1.2) (15) (2,10) (4,8) (7,11) 
= (3,9) (6, 12) 


=B 


C? = (1,7)(8,9) (4, 10) 6, 12) AIMED 
= (2,8)(3,9)(5, 11) 6, 12) 


= A?xBxC 


(3.3) 


(3.4) 


(3.5) 


(3.6) 


(3.7) 


(3.8) 
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The presentation of N is < a,b,c,d,e| a*,b?,c?, (a,b), (a,c), (b,c), d°, e”, (d * 
e)*,a4 = a,b" = bx c,c4 = a® * b,a® = a,b® = b,c® = a** b* c >. Therefore, N is the 


semi-direct product of 4 x 2? : S3. 


3.4 Isomorphism Type (4 x 27) : «A, 


Our goal is to find the Isomorphism type of the transitive group N on 24 let- 
ters. N is a group of order 192 and is generated by x ~ (1,3) (2, 4) (5, 23) (6, 24) (11, 12) 
(13, 14) (15, 16) (17, 18) (19, 22) (20,21) and y ~ (1,7, 22, 24, 10, 19) (2, 8,21, 23,9, 20) 
(3,11, 15,6, 14, 18) (4, 12, 16,5, 13,17). 


The Normal Lattice of N is 


NL[9] 
Order 192 


NL{7] NL[8] 
Order 64 Order 96 
NL[5] NL[6] 
Order 16 Order 32 


Figure 3.3: Normal Lattice of 4 x 2? 
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The largest normal abelian subgroup of N is NL[5], which is of order 16. This 


implies that NL[5] can be isomorphic to Z2 x Z2 x Zo x Zo, or Z4 x Zo x Zo, oF Z4 x Za, OF 


Zi. NL[5] is generated by three elements, 
< A,B,C >=< (1,5, 24, 4) (2, 6, 23, 3)(7, 11, 10, 14) (8, 12,9, 13) (15, 22, 18, 19) (16, 21, 17,20), 
(1, 2) (3, 4) (5, 6) (15, 17) (16, 18) (19, 21) (20, 22) (23, 24), 
(1,23) (2, 24) (3, 5) (4, 6)(7, 8) (9, 10)(11, 12)(13, 14) >. The presentation for NL[5] is given 
by < a,b,c | a’, b’,c’, (a,b), (a,c), (b,c) >. Since NL[5] is an abelian subgroup of order 
16 and N is of order 192, we are looking for a normal subgroup of order 12. However, N 
does not have a normal subgroup of order 12. 

Now we factor N by NL[5] and see that N is an extension of NL[5] by N/ NL[5]. 
Thus, N/NL[5] = gq =< NL[5]D, NL[5|E > and N/ NL[5] =< D,E > is of order 12. 
D ~ (1,3)(2,4) (5,23) (6, 24) (11, 12) (13, 14) (15, 16) (17, 18) (19, 22) (20, 21) of order 2 and E ~ 
(1,7, 22,24, 10, 19) (2,8, 21, 23, 9, 20) (3, 11, 15,6, 14, 18) (4,12, 16,5, 13,17) of order 6. Now 


we conjugate every generator in NL[5] by D and E. 


AP = (1,5,24, 4) (2,6, 23, 3)(7, 11, 10, 14) (8, 12,9, 13) (15, 22, 18, 19)(16, 21, 17,20)? 
= (1,4, 24, 5) (2,3, 23,6) (7, 12, 10, 13) (8, 11,9, 14) (15, 20, 18, 21) (16, 19, 17, 22) (3.9) 


= ABC 


BP = (1,2)(3,4)(5, 6) (15, 17) (16, 18) (19, 21) (20, 22) (23, 24)? 
= (1,2) (3, 4) (5,6) (15, 17) (16, 18) (19, 21) (20, 22) (23, 24) (3.10) 


=B 
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C? = (1,23)(2,24) (3, 5)(4, 6) (7,8)(9, 10) (11, 12)(13, 14)? 
= (1,23) (2,24) (3,5) (4, 6) (7,8) (9, 10) (11, 12) (13, 14) (3.11) 


=C 


A® = (1,5,24,4) (2,6, 23, 3)(7, 11, 10, 14)(8, 12, 9, 13) (15, 22, 18, 19) (16, 21, 17,20)" 
= (1,6, 24,3) (2,5, 23, 4)(7, 13, 10, 12)(8, 14,9, 11) (15, 19, 18, 22)(16,20,17,21) (3.12) 


= A°C 


BF = (1,2)(3,4)(5, 6) (15, 17) (16, 18) (19, 21) (20, 22) (23, 24)" 
= (1,23) (2, 24) (3, 5) (4, 6) (7, 8) (9, 10) (11, 12) (13, 14) (3.13) 


=C 


C= (1, 23) (2, 24) (3, 5) (4, 6) (7, 8) (9, 10) (11, 12) (13, 14)% 
= (7,9)(8, 10) (11, 13) (12, 14) (15, 16) (17, 18) (19, 20) (21, 22) (3.14) 
= A*BC 


The presentation of N is < a,b,c,d,e|a‘, b*, c, (a, b), (a,c), (b,c), d’, e°, (d * e), a4 = 


abc, b4 = b,c4 = c,a® = ac, b® =c,C = a’be>. 


However when we verify if the presentation is isomorphic to N, MAGMA tells us that it 


is not. 


MAGMA CODE: 
> H<a,b,c,d,e>:=Group<a,b,c,d,ela4,b°2,c72, (a,b), (a,c), (b,c) ,d°2, 
e73, (d*e) “3, a7d=axb*c , b*d=b,c~d=c ,a*e=a73*c,b~e=c>; 
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> H<a,b,c,d,e>:=Group<a,b,c,d,ela74,b°2,c72, (a,b), (a,c), (b,c) ,d°2, 
e73, (d*e) “3, a7d=axb*c , b~d=b, c~d=c ,a7*e=a73*c, b7e=c, C7 e=a7~2*b*C>; 

> #H; 

192 


> £,H1,k:=CosetAction(H,sub<H|Id(H) >) ; 
> IsIsomorphic(H1,N) ; 
false 


From this we can conclude that N is not a semi-direct product of NL[5], rather it is a 
mixed extension. This means that some elements of N/ NL[5] can be written in terms 
of the elements in NL[5]. In order to proceed, we must check the order of the elements 
of NL[5]. 


In MAGMA we compute: 


> Order (q.1); 

2 

> Order(T2) eq Order(q.1); 
true 

> Order (q.2); 

3 

> Order(T3) eq Order(q.2); 
false 

> Order (T2*T3) eq Order(q.1*q.2); 
false 

> Order (T3) ; 

6 

> Order (q.2); 

3 


Given that there exists a homomorphism from N to N/ NL[5], we know 
T [2], T[3] € N. However, we verified through MAGMA that D = T[2] is of order 3, 


and E = T[3] is order of E is 6. This means that E? « NL[5], and (D « E)? = AB. 


> H<a,b,c,d,e>:=Group<a,b,c,d,ela74,b°2,c72, (a,b), (a,c), (b,c), 
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d*2,e73=a72, (d*e) ~3=a*b,a~d=a*b*c,b~d=b, 

c~d=c ,a~e=a~3*c,b~e=c,c~e=a7~2*b*C>; 

> #H; 

192 

> £,H1,k:=CosetAction(H, sub<H|Id(H)>) ; 

> IsIsomorphic(H1,N); 

true Mapping from: GrpPerm: Hi to GrpPerm: N 
Composition of Mapping from: GrpPerm: Hi to GrpPC and 
Mapping from: GrpPC to GrpPC and 

Mapping from: GrpPC to GrpPerm: N 


Therefore, the presentation of N is < a, b,c, d, e|a*, b’, c*, (a, b), (a,c), (b,c), d?, e = a’, (dx 
e)? = ab,a® = abc, b¢ = b,c4 = c,a® = abc, b® = c,c® = a’ bc >. Thus N is the mixed ex- 


tension of (4 x 22) : «Ay 
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Chapter 4 


Double Coset Enumeration 


4.1 Preliminaries 


Definition 4.1.1. (right coset) If S is a subgroup of Gand if te G, then a right coset of S€ 
Gis the subset of G: St = {st:s € S} (a left coset is tS = {ts:seS}). One calls t a representative 


of St (and also tS). [Rot95] 


Theorem 4.1.2. If S<G, then any two right (or any two left)cosets of S in G are either 


identical or disjoint. [Rot95] 


Theorem 4.1.3. If S<G, then the number right cosets of S in G is equal to the number of 


left cosets of S in G. [Rot95] 


Definition 4.1.4. (index) If S<G, then the index of S in G, denoted [G:S], is the number 


of right cosets of S in G. [Rot95] 
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Definition 4.1.5. (conjugate) If x € G, then a conjugate of x in G is an element of the 


form axa! for some ae G. [Rot95] 


Definition 4.1.6. (double coset) If S and T are subgroups of G, then a double coset is a 


subset of G of the form SgT, where ge G. [Rot95] 

Definition 4.1.7. (G-set) If X is a set and G is a group, then X is a G-set if there is a func- 
tion a: Gx X — X (called an action), denoted by a: (g, x) — gx, such that: 

@ 1x =x for allxe X; and 


Gi) g(hx) = (gh)x for all g he Gandxe X. [Rot95] 


Definition 4.1.8. (acts) G acts on X, if |X| =n, then n is called the degree of the G-set X. 


[Rot95] 


Definition 4.1.9. (G-orbit) [f X is a G-set anf x € X, then the G-orbit of x is 9 (x) = {gx: g 


€ Gic X, (0 (x) denoted Gx). [Rot95] 


Definition 4.1.10. (stabilizer) If X is a G-set and x € X, then the stabilizer of x, denoted 


by Gx, is the subgroup G, = g€ G: gx=xs G. [Rot95] 


Theorem 4.1.11. IfX is a G-set and x € X, then |9(x)| =[G: Gy]. [Rot95] 


Corollary 4.1.12. Ifa finite group G acts on a set X, then the number of elements in any 
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orbit is a divisor of |G|. [Rot95] 


Corollary 4.1.13. @ IfGis a finite group and x€ G, then the number of conjugates of x € 
Gis [G: Cg(x)] (Cg, is centralizer). (ii) If G is a finite group and H < G, then the number 


of conjugates of He Gis [G: Nc(H)] (Ng, is normalizer). [Rot95] 


Definition 4.1.14. (transitive) A G-set X is transitive if it has only one orbit; that is for 


every x, y€ X, there existso € Gwith y=ox. [Rot95] 


Definition 4.1.15. (Point Stabilizer) A point stabilizer of w in N, denoted by N”, N” = 
{ne N| w" = w}< N, where w is word of the tis 

Lemma 4.1.16. The point stabilizer N“ is a subgroup of N. Apply the subgroup test to 
N”. 

l.w®=w>eeN” 

2. Leta,be N”, we want to show that abe N” 

w@? = (w%) 

= w? 

=w 

>abeN” 

3. Letae N”. Showa”! € N”. Given w4 = w 


1 w 


-1 = = = _ 
Thenw** = wa. Sow=w~“. Thusa7! = w, anda!€ N”. 


Definition 4.1.17. (Coset Stabilizing Group) The coset stabilizing group of the coset 


Nw is NW=ineN|Nw"=Nw where w is a word in the eo 
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Lemma 4.1.18. The coset stabilizer N“™ is a subgroup of N. Apply the subgroup test to 
N”, 

l.ee N™) since Nw? = Nw 

2. Leta,be N™), we want to show that abe N™ 
Nw = Nw and Nw? = Nw, Then Nw® = N(w%)” 
= (Nw? 

=N(w)? 

=Nw=>=> abe N™ 

3. Letae N™. Showa”! N™, Given Nw“ = Nw 
> (Nw% =Nw 

= (Nw9*' =(Nw)* 

>Nw' =Nw® 


=> Nw=Nw~. Thus a! N™, 


Lemma 4.1.19. NY < N“™ 

Letae N” and N™ = {ne N| Nw"= Nw} 
>w*=w 

>Nw*=Nw 


>aeN), 


|N| 


Lemma 4.1.20. The number of right cosets in the double cosets NWN is Ivey 


, since 
Na#Nb—= Na4zN™ b. 


Lemma 4.1.21.(Equality of Right Cosets Nw) = Nw2 
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—> Ww), € Nw2 

— Ane NI WwW, =NwW2 

Lemma 4.1.22.(Equality of Double Cosets Let NwN = {Nw”|ne N}={mw"|n,me 
N} define a double coset. Let Nw,N = {Nui} | n € N} be one double coset and w, € 
Nw\N and let Let Nw2N = {Nwy | n€ N} be a different double coset. Then Nw, N = 
Nw2N 

w,€ Nw, N=Nw2N 

—> Ww, € Nw2N 

<— WwW) = MW2n wherem,ne N 

—> WwW), = mn! Won 

=> WwW, =mnwy 

=} w= gw; whereg=mne N 

Definition 4.1.23. (Double Coset Algorithm) Perform the double coset enumeration of 
group G over transitive group N, where double cosets take the form NwN = {Nwn| ne N} 
= {Nw" | ne Nj}. 

(i) Compute the point-stabilizer N“ and coset stabilizer of each double coset. 

(ii) Compute the number of right cosets by using the formula Tce where N“) = {ne N 
| Nw” = Nw} is the coset stabilizer of the right coset. 

(iii) For each double coset NWN, compute the orbits of N (w) it suffices to determine the 
double coset of Nwt; for a single representative of each orbit. Note, N“) = N™ is always 
true. 

(iv) Determine which double coset each coset representative Nwt; belongs to, (repeat the 


process until closed by coset multiplication ) . 
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4.2 Double Coset Enumeration of PGL(2,7) over 27 : 3 


= 28:27:3 : 
G=  CUDACTCU BE Consider the group, 


G<x,y,t>= Group < x,y, t|x>, y®, (xy), t, (t, xy"! x) > factored by (xt’ t*)* and (xt? (t’)*)3 
where x = (1,3,5)(2,4,6) , y= (1,2,6)(3,4,5) and t = 4;. Now we substitute the values of 
x and y and expand our relation (xt) t*)* = e to obtain, 
(235) (246) 1(7706%) 1199) a = (135) (246) fo t3) 
= (135) (246) fe t3 (135) (246) bo fg 
(4.1) 
= (135) (246) (135) (246) (f2 £3)" 39" ft 
= (153) (264) t4 t5 fo tg 
Our first relation (153) (264) ty ts to tg = e can be written as (153) (264) t4 ts = t3 fo 
Similarly, we expand our second relation to obtain, 
(135) (246) p{126)(346) ( p{126)(345)) (135) ey = ((135) (246) to t)° 
= (135) (246) fo f4 (135) (246) fo t4 (135) (246) fo ty 
= (135) (246)° (ty t4) 9924 (9 14) 39C49) pp 14 
= Clg to tatetots 
(4.2) 


Our second relation fg fo t4 tg f2 ty = e can be written as fg fo ty = ty ho tg. 


We conjugate the first relation (153) (264) t4t5 = t3f2 by all the elements of N 


to obtain twelve new relations. 


(153) (264) ty pees 


(153) (264) t4 fre) (234 


(153) (264) t4t5 


132) (465 


(153) (264) t4 a (345 


(153) (264) ty (G4 


(153) (264) ty LOC 


= Bl, 
= Bt, 
= it, 
= t, 


= bl, 


= bl, 


153) (264 


156) (234 


132) (465 


126) (345 


162) (354 


126) (345 


(153) (264) ty 2 9P5) = f, p25 


(153) (264) ty 0 VG8 — 4, (VG6 


(153) (264) ta grsorteae) age 1{135)(246 


(153) (264) ty fee = fs plearann 


(153) (264) ty PG) — 4, p28)86 


=> (153) (264) f2t3 = fh tg 
=> (123) (456) fo fg = tats 
=> (156) (234) tg t4 = fo th 
=> (156) (234) ts t3 = ta tg 
=> (123) (456) fg f& = t5h 
=> (126) (345) fg = fot, 
=> (156) (234) tf fb = fg ts 
=> (123) (456) fh fs = 6 to 
=> (153) (264) tg t) = t5 ty 
=> (126) (345) tt = fh ts 


=> (126) (345) ty fo = te ts 
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(4.3) 


We conjugate the second relation t¢t2t4 = t4tote by all the elements of N to 
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obtain twelve new relations. 


tg tat CY = ty ty °9P = tig = hr tet 
tte tO = ty f° & hh = hbbh 
tg tat POO) = ty ty 1890) = ts ty te = tet ts 
tte tS) = ty °C) = ty tts = ty tet 
te tr tO = ty LO & bh ts = Bhh 
ttt C® = ty ty LOC”) = ts tty = ty bats (4.4) 


tet)? = ty) = test = hts te 


tg to frien = {4h pene > thht =hhts 


tt2t PO) = ty LC) = bh ty tg = te tae 


gta OP Spr OP = aise = i5 4 


tet tS = ty tS = tts ty = tats b3 


We will use our technique of double coset enumeration to show that 


|G| <= 336. 


lst Double Coset [*] 


Let [*] represent the double coset which contains NeN = {N(e)” | n € N} = {N}. The 


coset stabilizer of NeN = N. The number of single cosets in [*] is equal to It = % 1. 


The orbits of N on {1,2,3,4,5,6} are {1,2,3,4, 5,6}, that is, there is one single orbit. Now 
select a representative from the single orbit, say 1, and find the double coset that con- 
tains Nt,. We determine that Nt, belongs to a new double coset Nt, N denoted by [1]. 
There are 6 elements in the orbit {1,2,3,4,5,6}, therefore, all 6 symmetric generators 


will move forward. 
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Figure 4.1: Cayley Graph PGL(2,7) over 2? :3 


2nd Double Coset 


Let [1] represent the double coset that contains all the elements in Nt, N. 


NtN ={N(t)"| ne N} 


= INE AN IEP NG or Ne me 
Ngee OP Ng re rr Nr eno NE ena, (4.5) 


NES APR) ne ere Bag perrae)) 
= {Nt, Nto, Nt3, Nty, Nts, Nig} 


The point stabilizer of N! is e, (25) (36), since these are the only two elements that sta- 


bilize 1. The coset stabilizer of N = {e, (25)(36)}. The number of single cosets in [1] is 


IN| _ 12 


equal to Ina] = 2 


= 6. The orbits of N on {1,2,3,4,5, 6} are {1}, {4}, {2,5}, and {3,6}. Now 
select a representative from each single orbit, 1 € {1},4 € {4}, 2 € {2,5},3 € {3,6} and de- 
termine the double cosets that contains Nt, t,, Nt, ts, Nt) t, and Nt) tz. We have four 


possible new double cosets. We use our first relation to determine if we will have four 


distinct double cosets. 
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Nt, t, = Ne € [*] , since there is one element in the orbit {1}, one symmetric generator 


will return to [*]. 


Nt, tz belongs to a new double coset Nt t2N denoted by [12], since there are two ele- 


ments in the orbit {2,5}, two symmetric generators will move forward. 


Nt, tz denoted by [13]= [12]. If we conjugate our first relation (153) (264) t4t5 = tgt2 by 


(123) (456) we get 


(153) (264) ty gee = fy ie 


(126) (345) t5t6 = th fg 


Now, f1 3 = (126) (345) ts tg 

So Nt, t3 = Nts tg = N(t to) 9) 249 € [12] 

But Nt fg ¢ [12] so Nt fg = [12] 

Nt t, belongs to a new double coset Nt, t4N denoted by [14], since there is one ele- 


ment in the orbit {4}, one symmetric generator will move forward. 
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Figure 4.2: Cayley Graph PGL(2,7) over 2? :3 


3rd Double Coset [12] 


Let [12] represent the double coset containing the elements, 
Nt tN ={N(t te)" |ne N} 
= {N (ty f2)°, Nt ty) PPO), NC 9 PES, Nt OSES), 
N( tt) 229845) (tt) 252859 Nt fp) 159249 NL H) LIE, 
(4.6) 
N( ty) 2989), N(t, ) 239249 (tt) 429459 Nt tp) 2989) 
= {Nt bh, Nist, Nt5t3, Ntzh, Ntote, Nigh, 
Nigts, Ntgts, Ntg to, Ntg tq, Nt2t3, Nt t5,} 


Lemma Nf fo ty = Nhot3t; 


Conjugate the original relation (153) (264) tts = t3 t2 by (165) (243) to get, 
(153) (264) ty LOVC49) = yp, 929) 
(156) (234) #3 t) = tots 
Then ty f2 t4 = t (156) (234) fg 4 (4.7) 
= (126) (453) fo t3 


>Nthbt,= Nhbth 


51 


Lemma Nf, fo t5 = Nos 


Conjugate the original relation (153) (264) t4t5 = t3t2 by (14) (25) to get, 


(153) (264) ty 29° = t2090) 
(156) (234) fy fo = tg f5 
=> tf = (165) (243) bts 
(4.8) 
Then ty t2 t5 = (165) (243) &3 ts t5 
= (165) (243) tg 
>Nthhbt=Nts 
Lemma Nf fo tg = Nts ty ts 
Conjugate the original relation (153) (264) tts = t3 t2 by (156) (234) to get, 
(153) (264) ty 11580234) =e p{156) 234) 
(123) (456) fa t6 = tha 
=> fy tg = (132) (465) ty tg Then ty tp te 
(4.9) 
= t,(132) (465) ty t3 
= (132) (465) f3 fy fg 
=> Nt) tote = Nts tats 
The point stabilizer of N!? is {e}. The coset stabilizer of N“” = {e}. The number of 
single cosets in [12] is equal to ny — iE = 12. The orbits of N on {1,2,3,4,5,6} are 
{1}, {2}, {3}, {4}, {5},and {6}. Now select a representative from each single orbit, 1 € {1}, 
2 € {2}, 3 € {3}, 4 € {43,5 € {5}, and 6 € {6} and determine the double cosets to which they 


belong. 
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Nt, t2t, € [121], which is a new double coset. Thus one symmetric generator moves 


forward. 


Nty tate € [1], since Nt to t2 = Ntje = Nt. Thus, one symmetric generator goes back. 


Nt, t2t3 € [123], which is a new double coset. Thus one symmetric generator moves 


forward. 


Nt, ft € [123]. From the lemma, we know N fy f t4 = Nbr tg t) = N(t f2t3)?) 459 Then 


Nt, t2t4 € [123]. Thus, one symmetric generator goes to [123]. 


Nt fets € [1]. From the lemma Nf fy ts = Nts = Nt @®)_ Then Ng hots € [1]. Thus, 


one symmetric generator moves goes back to [1]. 


Nt, fo t¢ € [121]. From the lemma N fy fo tg = Nig t4t3 = N(t bo Ayes) Then N tj fa tg € 


[121]. Thus, one symmetric generator moves forward. 
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Figure 4.3: Cayley Graph PGL(2,7) over 2? :3 


4th Double Coset [14] 


Let [14] represent the double coset containing the elements, 


Nt, t4N ={N(t ta)” |ne N} 
= {N(t1 ta)° (ty ta) PFO, N(ty ta) POCO, N(ty ta) G80), 
N(t ye” (3,4,5) N(ty ip oS P2), N(ty pl Oeas). N(ty ty) bVE5) (4.10) 


NG) OR? Mee") NG ree, Nien) 
={Nt ty, Nis, Nt3 te, Nits, Ntgt3, Nth, 
The point stabilizer of 14 is {e, (25) (36)}. In order to see the number of elements that are 


in the coset stabilizer, we must identify the element that stabilizes the coset. 


54 


If we conjugate our relation by (135) (246) to obtain, 


(153) (264) tt) = t5 ta. 
So f2(153) (264) ty = t5 ty. 
Thus (153) (264) fy tats = ty. 
Therefore, 1 4 ts t2 = (135) (246) € N. (4.11) 
ThenN fj t4 ts t2 = N 
Hence Nt) t4 = Ntiots. 
N(hig Pe = Bis 


=> (126) (345) belongs to N“), 


Therefore, the coset stabilizer of Nt) t4 is < e, (25) (36), (126)(345) >= N. The number 
of single cosets in [14] is equal to ney = - = 1. The orbits of N on {1,2,3,4,5, 6} are 
{1,2,3,4,5,6}. Now select a representative from the single orbit, 4 € {1,2,3,4,5,6}, and 


determine the double cosets to which it belongs. 


Nti tgtg € [1], since t4t4 = 2 =eand Nt tt, = Nt,e€ [1]. Thus all 6 symmetric genera- 


tors go back to [1]. 
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(14) 


Figure 4.4: Cayley Graph PGL(2,7) over 2? :3 


5th Double Coset [121] 

Let [121] represent the double coset containing the elements, 

Nt tN ={N(t tt)" |neN} 
= {N(h fgt))°, Nh yt) 9P PPA, Nt ty) PC84 N(H POO, 
N(ty tot) 029849), Nt ty £1) 9295.4, Nt ht) 59243), Nth O92, 
Nig) OOO NG BA)? SN ih) err Noa) om) 
={Nt tot, Ntstgts, Nt5t3t5, Nigh t3, Nbigth, Nigh te, 
Nigtate, Ntgtsta, Ntgtotg, Ntgta ta, Notte, Nt t5t,} 

(4.12) 


The point stabilizer of 121 is {e}. However, since Nf, t2t; = Nt3t, tg, the coset stabilizer 


of N@2) = fe, (132)(465), (1,2,3)(4,5,6)}. The number of single cosets in [121] is equal 
to aT = 2 = 4. The orbits of N on {1,2,3,4,5, 6} are {1,2,3} and {4,5,6}. Now select 
a representative from each single orbit, 1 € {1,2,3} and 4 € {4,5,6} and determine the 


double cosets to which they belong. 
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Nt tot) t € [12]. Since tt = if =e. Then Nty fot tf = Nt tty = Nt) f € [12]. Thus 3 


symmetric generators go back to [12]. 


Nt tat; tg € [12]. If we conjugate our original relation (153) (264) t4t5 = t3t) by (132) (465) 


we get 
(153) (264) ta 15) °°) = (3 12) 99G00) 
(4.13) 
(156) (234) tg t4 = tet) 


Also, if we conjugate our original relation (153) (264) t4 t5 = tg t2 by (123) (456) we get 


((153) (264) ty ts) (123) (456) _ (£3 t) (132) (465) 


(4.14) 
(126) (345) t5%6 = tbs 
We use both relations to show, 
ty to ty t4 = ty (156) (234) fg ta ty 
= (156) (234) ts tge (4.15) 


= (156) (234) ts tg 


Nt, fot ts = Nts tg = N(t) 2) @™ e€ [12]. Therefore, Nf fof; t, € [12] Thus 3 


symmetric generators go back to [12]. 
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Figure 4.5: Cayley Graph PGL(2,7) over 2? :3 


6th Double Coset [123] 

Let [123] represent the double coset containing the elements, 

Nt ft3N ={N(ttot3)” |ne N} 
= {N(ty fots)°, N(ty toty)P PCO, N(ty tp t3)9 7 9P 99, N(t tp tg) EO), 
N(ty to tg) 029-49), Nt ty tg) 9295.9 N (ty fy tg) 59243) Nt te) E929), 
Nigel OP NG EB) PONG bey hore Nn) Oe) 
={Nt tots, Nit5tgth, Nt t3ty, Nigh to, Nbigt,, Nigh ts, 
Nigtate, Ntyt5t3, Ntgtote, Nizgtyts, Nbot3h, Nt tte, } 

(4.16) 


The point stabilizer of N 123 is {e}. However, since Nfj to t3 = Nts5t3t,, the coset stabi- 
lizer of N“?3) = {e, (1,5,6)(2,3,4), (1,6,5)(2,4,3)}. The number of single cosets in [123] 
is equal to ay 7 2 = 4. The orbits of N on {1,2,3,4,5, 6} are {1,5,6} and {2,3,4}. Now 


select a representative from each single orbit, 1 € {1,5,6} and 3 € {2,3,4} and determine 


the double cosets to which they belong. 
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Nt t2t3t; € [12]. If we conjugate our original second relation fg tz t4 = t4 tz tg by (14) (36) 


we get 


fet ae (36) _ Hb ies) 


(4.17) 
> bhth=hhbks 
Now we show, 
hbtith =tbhhh 
= fgho 
(4.18) 
= (153) (264) t4 ts 


> Nt btgt = Ntytt= N(h tp) 1929) € [12] 


Therefore, Nf} t2t3t, € [12]. Thus, 3 symmetric generators go back to [12]. 


Nt tot3t3 € [12]. Since, t3t3 = is =e. Then Nt fot3t3 = Nh tpt? = Nt,t. Thus 3 sym- 


metric generators go back to [12]. 
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Figure 4.6: Cayley Graph PGL(2,7) over 2? :3 


4.3. Double Coset Enumeration of PSL(2,11) over Dg 


a 
(xyt?)3,(x1)" 5 


y)?, t2,(t,x% yo} * x), t* tY «28 & 1) = y2 *  * £1 > factored by (xyt’)3 and (xt 1)° 


Consider the group, G < x, y,t >:= Group < x, y, t|x?, y°, (x* 


where x = (1,3,5)(2,4,6) , y= (1,2,6)(3,4,5), ¢’s are of order 2 and ft = tf). Next we will 


expand our relations. 


Expanding the relation (x * y * t’)° 


Let a = xy = (1,4)(2,5) 
ayy =e 


and z° = (xy)? = (1,4)(2,5) Now we will expand our relation (x * y * t’)> =e 


(xx y* t¥)8 


=1lo-Nto-Wlo 


(1 t2)3 


3 2 
=T bh he 


=(n p26) 3,4,5))3 
Po 1 


SUC Sore 


= (1,4) (2,5) tots to 
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(4.19) 


Our relation is (1, 4) (2, 5) f2 ts t2 = e which can also be written as (1, 4) (2,5) tts = 


ta. We use this relation to find other relation by conjugating by the elements in N. 


(1,4) (2, 5) t2t5 
(1,4) (2, 5) t2t5 


( ) 
( ) 
((1, 4) (2,5) fats) 
( ) 


(1,4) (2,5) tats 


(1,4) (2,5) to pees 


((1, 4) (2,5) fats) 


(1,4) (2,5) tots 
(1,4) (2,5) tats 


( ) 
( ) 
((1, 4) (2,5) fats) 
((1,4) (2,5) fats) 


(42,5) tt5 


1,6,5 


‘a 


(2, 


5) (3,6 


4,6,5 


4,5,6 


2,4,3)) _ 


2,4,6) _ 


2,3,4) _ 


24,3) _ 


> (1,4(3,6) tt = t% 
=> (2,5)(3,6) te t3 = fe 
=> (2,5)(3,6) tg lz = fe 


>01,43,60h%=h 


=t "> C425) 6h =ts 


= 12 C8) < (1,4)(2,5) t5 fe = ts 


— 73,2 
=t, 


>(143,0ht=h 
=> (2,5)(3,6) tg te = b3 
=> (2,5) (3,6) tg te = b3 
>(1438,0ht=h 


=> (1,4) (3,6) f4h = 4 


(4.20) 


(4.21) 


(4.22) 


(4.23) 


(4.24) 


(4.25) 


(4.26) 


(4.27) 


(4.28) 


(4.29) 


(4.30) 


(4.31) 
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Expanding our relation (xt! : iP 


Leta t. ee 3 5046), 0 S05, 8264) He S18, 240), 
and x° = (1,5,3)(2,6,4). Also, let y = (1,2,6)(3,4,5) and y’ = (1,6, 2) (3,5, 4). 
We expand our relation as follows: 
(xt! t)> = (x162854 t1)° 
= (xf t)° 
= Xtgt-Xtgt) -Xtgt) Xitel -Xtety (4.32) 
= 3° (tg ty)* (tet)* (tety)” (tet) tet 
= (1,5,3) (2,6, 4) fo fg tg ty ty ts to tg tg th 
Our relation is (1,5, 3) (2, 6, 4) fo £3 tg ty ty ts te t3 tg t) = e which can also be written as (1,5, 3) (2, 6,4) to tg tg ty ty = 


t tg t3 tots 


We will also use the relation (1,6, 2)(3, 5,4) ts tg t2 = t) tgt4. We can also conju- 
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gate this relation by all the elements of N to obtain eleven new elements. 


1,5,3) (2,6,4 2,6,4 


(1,6, 2) (3, 5,4) fs tg ts = tty’) = (1,3,2)(4,6,5) ts tale = ts tg te 


1,5,6) (2,3,4 2,3,4 


= htt 


(1,6, 2) (3,5, 4) ts te ly > (1,3, 5) (2, 4,6) te al t3 = I5f3 to 


1,3,2)(4,6,5 1,3,2 
=hhtt 


(1,6, 2) (3,5, 4) bs te ly > (1,3, 5) (2, 4,6) ty ts ty = 13 b6 


1,2,6) (3,4,5 1,2,6 
=hhtt 


(1,6, 2) (3,5, 4) ts te ty > (1, 6, 2) (3, 5, 4) 3 t t¢ = ta tets 


1,6,2) (3,5,4 1,6,2 
= ttt! 


(1,6, 2) (3,5, 4) ts t6 5 > (1,6, 2) (3,5, 4) t4t2t = tet t3 


(1,6, 2) (3,5, 4) t5 tg bP O48 


Shbin? => (1,3,2)(4,6,5) ty t5 ty = tetyts, (4.33) 
(1,6,2)(3,5,4) t5 tg 0090 = tt? ?) = (1,3,2)(4,6,5) bate ls = tats ty 
(1,6,2)(3,5,4) t5 tg 0098 = 4 PS” = (1,6,5)(2,4,3) 5 fg bo = ty 

(1, 6,2) (3,5, 4) t5 tg FF = py t1089F49 — (1, 6,5) (2,4,3) ty fata = bg late 


(1,6, 2)(3,5,4) ts tg?) O99) = ty ty th?) 99) > (1,6,5)(2,4,3) fg tals = tabs ts 


(1,6,2)(3,5,4) t5 tO = ty tO” > (1,3,5)(2,4,6) fot ts = ty ts ta 


First Double Coset|*] 

Let [*] represent the double coset [«] = {NeN = N(e)” | ne N= N}. The coset stabilizer 
of Ne = N. The number of single cosets in [*] is equal to et = + = 1. The orbits of N 
on {1,2,3,4,5,6} is {1,2,3,4,5,6}, that is, there is one single orbit. Now select a repre- 
sentative from the single orbit, say 1, and find the double coset that contains Nt). We 
determine that Nt, belongs to a new double coset Nt, N denoted by [1]. There are 6 


elements in the orbit {1, 2,3, 4,5, 6}, therefore, all 6 symmetric generators will move for- 


ward. 
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Cs _C) 


[*] (1) 


Figure 4.7: Cayley Graph PSL(2,11) over Dg 


Second Double Coset[1] 


Nt,N={N(t))" |ne N} 
= ENE NE Oe NE NEO) aN eee) NEU ene 
Np eee NG ON NE NG oe, (4.34) 
Meee ee NEO 


= {Nt, Nt, Ntz, Nty, Nts, Nig} 


The point stabilizer of N! = {(2,5)(3,6)}. Similarly, the coset stabilizer N™ = {(2,5)(3,6)}. 


The number of single right cosets in N‘ = nth = 2 = 6.The orbits of N“ on X = 
{1,2,3,4,5, 6} are {1}, {2,5}, {3,6} and {4}. Now we select a representative from each orbit, 


say 1€ {1},2 € {2,5},3 € {3,6} and 4 € {4} and determine the double coset it belongs to. 
Nt tf; € [*] since tt = i? = e. Thus, one symmetric generator will move forward. 


Nt, tz € [12] which is a new double coset. Thus, two symmetric generators will move 


forward. 
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Nt, tg € [13] which is a new double coset. Thus, two symmetric generators will move 


forward. 


Nt, tg € [1]. In order to prove that Nt t4 € [1], we conjugate our original relation (1,4) (2,5) tots = 


t2 by (1,6, 5) (2,4, 3) to obtain (1,4) (3,6) 4 t4 = h. 


ht = tty 
=01,43,0)htt% 
= (1,4)(3,6) 2 
= (1,4) (3,6) since 1? =e 


=> Ntt= Nt, € [1] 


Thus, one symmtric generator loops back to [1]. 


(13) 


Figure 4.8: Cayley Graph PSL(2,11) over Dg 
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Third Double Coset[12] 


Nt} tN ={N(t fh)” |ne N} 
= {N(ty by N(ty fp) (153) ee N(ty fp) 156) (2,3,4) | N(ty pe ASS). 
N(ty fp) 1.6) (3,4,5) | N(ty to) (1,6,2) Biot), N(ty to) OE ao). N(ty f2) Cig ea). 
N(ty tp) b4) (3,6) N(ty to) (1,3,5) (2,4,6) Nt fp) b23) (4,5,6) | N(ty to) (2,5) (3,6) 
={Nbt to, Ntste, Nts t3, Ntgt), Ntote, Ntgh, Ntets, Ntats, Nigh, Ni3t4, Niots, 
Nt t5} 
(4.35) 


The point stabilizer of N!* = {e}. Similarly, the coset stabilizer N°” = {e}. The number 


of single right cosets in N22 = IX = 


= iy = 2 = 12.The orbits of N“” on X = {1,2,3,4,5, 6} 


are {1}, {2}, {3}, {4}, 5} and {6}. Now we select a representative from each orbit, say 1 € 
{1},2 © {2},3 © {3}, 4 © {4},5 © {5} and 6 € {6} and determine the double coset it belongs 


to. 


Nt, t2t, € [121], which is a new double coset. Thus one symmetric generator moves 


forward. 


Nt, fete € [1] since, ft. = is =eand Nt,e= Nt € [1]. Thus one symmetric generator 


goes back to [1]. 


Nt, t2t3 € [123] which is a new double coset. Thus, one symmetric generator moves 


forward. 
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Nt, t2tq € [124] which is a new double coset. Thus, one symmetric generator moves 


forward. 
Nt tats € [12]. In order to prove that Nt fs ts € [12], we use our original relation 
(14) (25) fa ts = fo. 


ty tats = ty (14) (25) fo 
= (14)(25) ty fo 


=> Nt tots = Ntato = N(ty to)" e [12]. 


Nt} t2 tg € [13] which is a new double coset. 


Figure 4.9: Cayley Graph PSL(2,11) over Dg 
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Fourth Double Coset [13] 


Nt,t3N = {N(t,t3)" | ne N} 
= {N(t1 t3)°, N(t163)°P P99), N(t ty) 98-4 Na t)982G9), 
N(ty t3) 029949), M(t, t3) 5265.4 Nt, t3)b59243) C4 ty) 929), 
(4.36) 

NG ROO Nee oP Nia Non) 
={NtB, Nish, Nts ta, Ni3t2, Ntzt4, NtgtsN te t2, Nt4t3, Ntate, Nig ts, 
Ntet), Nt te} 

The point stabilizer of N1° = {e}. Similarly, the coset stabilizer N° = {e}. The number 


of single right cosets in N“%) = Te) = 2 = 12. The orbits of N“*) on X = {1,2,3,4,5, 6} 


are {1}, {2}, {3}, {4}, {5}, {5}. Now we select a representative from each orbit, say 1 € {1},2€ 


{2},3 € {3} and 4€ {4}, 5 € {5} and 6€ {6} and determine the double coset it belongs to. 


Nt, t3t, € [131], which is a new double coset. Thus, one symmetric generator moves 


forward. 


Nt} tg t2 € [123]. In order to show this, we will use the relation (135) (462) tg t] fg = t5 f3 to 
obtained by conjugating the relation (162) (354) t5 tg t2 = t tat, by (156)(234). In addi- 
tion, we will use the relation (135) (246) t4t5t, = [3 tg obtained by conjugating the rela- 


tion (162) (354) ts te f2 = ty tat, by (132) (465). 
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ty gt = hts t5 03 le 


= t) 65(135) (246) tet £3 
= (135) (246) fg ty tg ty fs 
(4.37) 
= (135) (246) (135) (246) ty t5 fh th bg 
= (153) (264) ty 5 tg 
=> Nt; t3t2 = Ntyt5t3 = N(t f2t3)°? € [123] 
Nt, 1303 € [1]. Since fg f3 = i = e. Therefore N ty f3t3 = Nt, t2 = Nt. Thus, one symmet- 


ric generator moves back. 


We also determine 


Nt) f3t4 € [121]. Thus one symmetric generator goes to [121]. 


Nt, t3t5 € [12]. Thus, one symmetric generator goes to [12]. 


Nt, t3t¢ € [13]. In order to show this, we conjugate our original relation (14) (25) fo t5 = te 


by (123) (456) to obtain, 


GENO cera ee 


(4.38) 
(25) (36) tg te = f3. 
Now we have, 
th t3 6 = t (25) (36) fg 
= (25) (36) f t3 (4.39) 


Nt bgtg = Nt ts € [13] 
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Thus, one symmetric generator goes back to [13]. 


Figure 4.10: Cayley Graph PSL(2,11) over Dg 


Fifth Double Coset[124] 


Nt tgtgN ={N(t fot)" | ne N} 
= {N (ty t24)°, N(t tp tg)OPPCPOO, N (ty ty tg) OP PEF, N(ty By tg) GO), 
N(t be i245) N(t fo iy” GSA) N(ty to t4) (19) C3) N(ti ty) UVe25) | 
N (th ty tg)"PE), H(t ty ty) O49), (ty tp ty)? 4), N( ty ty t4) PPO} 
= {Nt to ty, Nt5 tg lz, Nb5 13 lo, Niz hy be, Nz to bs, Nt ty t3, Nite ta t3, Ntgtst, Ntg tot, 
Nt t4 tg, N to tg ts, Nt4ts ti} 


(4.40) 


The point stabilizer of N!** = {e}. However, since Nt tt, = Ntg tate, the coset sta- 


bilizer N° = {e, (1,5,3)(2,6,4), (1,3,5)(2,4,6)}. The number of single right cosets in 
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NO?” = ia =F = 4. The orbits of N°) on X = {1,2,3,4,5,6} are {1,3,5}, {24,6}. 


Now we select a representative from each orbit, say 3 € {1,3,5},2 € {2,4,6} and deter- 


mine the double coset it belongs to. 


Nt, totat3 € [121]. In order to show this, we will use our relation, (162) (354) t5 tg f2 = 
ty boty. 
ty to ta 3 = (162) (354) fs f6 fo t3 

= (162) (354) ts fg t2 (25) (36) £3 te 

= (162) (354) (25) (36) t2 £3 ts £3 te 

= (132) (465) f2 t3 ts 3 t 

(4.41) 

= (132) (465) (153) (264) t bs ty f3 te 

= (25) (36) fy ts ty t3 bg 

= (25) (36) (123) (456) t6 t4 fg t3 tg 


= (126) (345) f6 ta te 


Thus 3 symmetric generator go back to [121]. 


Nt t2tqt2 € [12]. Thus 3 symmetric generators go back to [12]. 
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Figure 4.11: Cayley Graph PSL(2,11) over Dg 


Sixth Double Coset[123] 


Nt t2t3N = {N(th f2t3)" | ne N} 
= {N (ty tats)®, N(t fats) P89, NC tots) OPCS, N( ty tp tg) 09 G09), 
ICES Amery). N(t to t) 6) (3,5,4) | N(ti fo t,) 165) (2,4,3) | N(ti to t3) 00295) 
N (th ty t3)"PE), H(t ty tg) O49), (ty tp 13)? 94), N( ty ty t3)PF 9} 
= {Nt f2t3, Nts tt, Nb t3t4, Nigh be, Nig te ty, Nt ty ts, Nig ty tz, Ntqtst3, Ntgtrt6, 
Nt3tqts, Nt tz, Nt ts te} 


(4.42) 


The point stabilizer of N 123 — fe}, However, since Nt fot3 = Nt3t,f, the coset sta- 
bilizer N“?) = {e, (1,3,2)(4,6,5), (1,2,3)(4,5,6)}. The number of single right cosets in 


NO = : rit = 2 =4. The orbits of N“*) on X = {1,2,3,4,5,6} are {1,2, 3}, {4,5, 6}. 


Now we select a representative from each orbit, say 1 € {1,2,3},4 € {4,5,6} and deter- 


mine the double coset it belongs to. 


Nt fbot3t, € [12], 


Nt tetgt, € [13]. 


Figure 4.12: Cayley Graph PSL(2,11) over Dg 
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Seventh Double Coset[121] 


Nt tot;N={N(t bt)" |neN} 
= {N (ty t2ty)®, N(t fot) OPO, N(ty fe) PPP, N(ty tt) OF 7O), 
N(t to t,) 128) Gay). N(ty i £1)152G,5.4) N(ty b 11) 0°) (2,4,3) N(ty to 1) 2925) | 
Nabi oP Nab) NGA) Nb) ee) 
={Nth bh, Ntsitet, Nt bts, Ntgt t3,Nbteto, Nigt fe, 
Nigtate, Ntatsta, Ntgtet4, Nigtats, Niots3t., Nh tt} 
(4.43) 


The point stabilizer of N 121 — fe}, Similarly, the coset stabilizer N (2) = fe}. The num- 


ber of single right cosets in N“2)) = wey = 2 =12.The orbits of N“?” on X = {1,2,3,4,5, 6} 
are {1}, {2}, {3}, {4}, 5} and {6}. Now we select a representative from each orbit, say 1 € 
{1},2 © {2},3 € {3}, 4 © {4},5 © {5} and 6 € {6} and determine the double coset it belongs 

to. 


We determine that, 


Nt, tet t; € [12], thus one symmetric generator goes to [121]. 


Nt, 21) t2 € [121], thus one symmetric generator goes back to [121]. 


Nt, 21; ts € [13], thus one symmetric generator goes to [13]. 


Nt tot; tg € [124], thus one symmetric generator goes to [124]. 


Nt, t2t ts € [121], thus one symmtric generator goes to [121]. 
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Nt, tz; tg € [131], thus one symmetric generator goes to [131]. 


Figure 4.13: Cayley Graph PSL(2,11) over Dg 


Eighth Double Coset [131] 


Nt t3t,.N ={N(tt3h)" |neN} 
={N(i Bh)? NABH) OO, NABH) PO NG BAe OO, 
N(ty Gj t,) 12-8) Bie) N(ty fy re aemaceiias N(ty a Ayo Gas). N(ty ty 1) 2925) | 
NGBA) OO NG BAe rr NBA) Pm NBA} 
={Nth bh, Nttt,Nttt, Nigtets,Nbtab, NigtigNigtets, Ntat3ta, 
Nt te ta, N tg ts t3, Ntot) to, Nh tet} 
(4.44) 


The point stabilizer of N!3! = {e}. However, since Nt, t3t; = Ntztqt2, the coset sta- 
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bilizer NS) = {e, (1,2,6)(2,3,5), (1,6,2)(3,5,4)}. The number of single right cosets in 


NOSD = “ity = “y= 4. The orbits of NS on X = {1,2,3,4,5,6} are {1,2,6}, {3,4,5}. 
Now we select a representative from each orbit, say 1 € {1,2,6},3 € {3,4,5} and deter- 
mine the double coset it belongs to. 

We determine 


Nt, t3t, t; € [13]. Thus, three symmetric generatos go back to [13]. 


Nt, t3t, t3 € [121]. Thus, three symmetric generators go to [121]. 


Figure 4.14: Cayley Graph PSL(2,11) over Dg 
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4.4 Double Coset Enumeration of 3*? :,,, D, 


_ 3% tmDa 
G = (x? ytt*)4 


The elements of N are {e, (1432), (1234), (13) (24), (12) (34), (14) (23), (13), (24)}, and the 
order of |N| = 8. Suppose x = (1,2,3,4) , y= (2,4) and t=. 
Before we begin our double coset enumeration, lets expand our relation (x? ytt*)*. 
wry a 234 Caney 
= (01,3)(2,4)(2,4) 41 2)" 
= ((1,3) 41 2)" 
(4.45) 
=(1,3hb0,)hb0,3 60,3) hh 
= (1,3)4 (01 2) 9 (41 2)" (ty ) tp 
=Bhihizhhh 
After expanding our relation we see that it is fg t2 ty fg t3 fat) t2 = e. We can simplify our 


relation to get #3 fot) f2 = tat3tath 


Relations 


We conjugate our relation f3 t2 f) t2 = t4t3 t,t, by the elements of N to find new relations. 


Beni? Suni 
Bbnh” =hRun rr 


tg tot) a (2,4) — ty t3 ty ge 


BBRIC OC? 


tg tot) ee 23) 


t3tot th”) = ty tg t,t 
ts tot t? = tytgtyt?* 


We will use our technique of double coset enumeration to show that |G| < 480 


First Double Coset 


= tytyt,t 


Suan?” 


1 


> bhtah = Bhhtgt, 


> tytigbtz=htyhhb 


>Shtybt= bth 


> tKyhtbh =tbhbh 


> biptytg=hhtt 


>Shbbh=thtub 


> bth ty = bhatt 


Labeling 
1 2 3 4 
fe se Ge 


77 


(4.46) 


[x] = {NeN = N(e)"”| ne N= N}. The coset stabilizer of Ne = N. The number of single 


IN| _ 8 


cosets in [*] is equal to =, = $= = 1. The orbits of N on {1, 2, 3, 4} is {1,2,3, 4}, that is, there 


IN| ~ 8 


is one single orbit. Now select a representative from the single orbit, say 1, and find 


the double coset that contains Nt,. We determine that Nf, belongs to a new double 


coset Nt, N denoted by [1]. There are 4 elements in the orbit {1,2,3, 4}, therefore, all 4 


symmetric generators will move forward. 
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[*] (1) 


Figure 4.15: Cayley Graph of 3*? tm Da 


Second Double Coset[1] 


Nt.N = {N(t)" | ne N} ={Nt, Nto, Nts, Nt4}. The point stabilizer of N! = {e, (2,4)}. 
Similarly, the coset stabilizer N’ () = {e,(2,4)}. The number of single right cosets in 


NO = ty = 3 =4. The orbits of N on X = {1,2,3,4} are {1}, {2,4}, {3}. Now we se- 


lect a representative from each orbit, say 1 € {1},2 € {2,4}, and 3 € {3} and determine the 


double coset it belongs to. 


Ntt= Ne = Nts € [1], so one symmetric generator loops back to [1]. 


Nt, tz € [12], which is a new double coset. This tells us two symmetric generators move 


forward. 


Ntt3 = Nt t? = Nt} € [*], since Nt} = Ne. Therefore one symmetric generator goes 


back to [*]. 
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Figure 4.16: Cayley Graph of 3*? :;, Da 


Third Double Coset[12] 


NttN ={N(h te)” |neN} 
={N(iib)’ Nb)? NB) NGb) PE Neyo Pe”), 
N(t1 2) 29, N(t t2)°), N(t 2) ?"} 
={Nthb, Nth, Nbt,Nbth,Ntit, Nt, Nigte, Nt ty} 


(4.47) 


The point stabilizer of N!* = {e}. Similarly, the coset stabilizer N“” = {e}. The number 
p y; 


of single right cosets in N°) = Ny = 8 =8. The orbits of N“”) on X = {1,2,3,4} are 


{1}, {2}, {3}, {4}. Now we select a representative from each orbit, say 1 € {1},2 € {2},3 € {3} 


and 4 € {4} and determine the double coset it belongs to. 


Nt, tet, € [121], which is a new double coset. This tells us one symmetric generator 


moves forward. 


Nt t2t2 € [12]. This result is obtained by evaluating our t’s. Nigtz = N oe From our 


labeling we know that N 1 = Nt. We replace Ntpt2 with Nt, to get Nt t4 which is in 
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the double coset [12]. Therefore, one symmetric generator loops back to [12]. 


Nt t2t3 € [123], which is a new double coset. Thus one symmetric generator moves 


forward. 


Nt, tot, € [1]. Once again we must evaluate our t’s. From our labeling Nt, = N i We 
replace Nt, and obtain Nt f2t3 which can be simplified to Nt t3. Since our t’s are of 


three, tS =e. Thus Nf tb is = Nt, € [1] and one symmetric generator goes back to [1]. 


[123] 


Figure 4.17: Cayley Graph of 3*? tn D4 


4th Double Coset[121] 


Nt tt)N={N(t tht)” |neN} 
= {N(ty f2t1)®, N( tot) 0, N(q ft) 78, N(q 2), 
N(t bt) 9?®), N(q et) ?, Nn ht), No pt)?} 
={Nt ht, Ntyt ty, Ntzt3 te, Ntgt te, Nt t3 ty, Nt3 t4t3, Nt3 12 13, NY 4h} 


(4.48) 
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(12) _ 


The point stabilizer of N!*! = {e}. Similarly, the coset stabilizer N {e}. The num- 


ber of single right cosets in N“2) = Tea) = 8 =8. The orbits of N°?) on X = {1,2,3,4} 
are {1}, {2}, {3}, {4}. Now we select a representative from each orbit, say 1 € {1},2 € {2},3€ 


{3} and 4 € {4} and determine the double coset it belongs to. 


Nt) tot) t) = Nt t2t?. From our labeling we know f? = f3, so we replace f? to get Nt tt € 


[123]. This tells us one symmetric generator goes to [123]. 


Nt tg) t2 € [1212], which is a new double coset. This tells us one symmetric generator 


moves forward. 


Nt, tz; t3 € [12]. We obtain this by evaluating our t’s. From our labeling we know f3 = i 
So we replace t3 to get Nf tot} i? = Nt f2t?, which simplifies to Nt t2. Thus one sym- 


metric generator goes back to [12]. 


Nt t2t) t4 € [1214], which is a new double coset. This tells us one symmetric generator 
moves forward. 


5th Double Coset[123] 


Nt t2t3N ={N(t fot3)” | ne N} 
= {N(ty fp t3)°, N(ty tats)", N( ty tots)", N(ty tots)", 
N(th to t3)"°9O9), N(t to t3)°9 9, N(t to t3)"), N(t 3) °} 
= {Nt tet3, Ntat to, Niot3t,, Ntot ty, Ntgt3te, Ntgtat, Ntgtet), Nth t4t3} 


(4.49) 


82 


[1212] 


(1214) 


{123] 


Figure 4.18: Cayley Graph of 3* :, Da 


The point stabilizer of N 123 — fe}, Similarly, the coset stabilizer N (123) = fe}. The num- 


ber of single right cosets in N29) = LN = 8 =8. The orbits of N“*®) on X = {1,2,3,4} 
gle rig [Na23] — T 


are {1}, {2}, {3}, {4}. Now we select a representative from each orbit, say 1 € {1},2 € {2},3€ 


{3} and 4 € {4} and determine the double coset it belongs to. 


Nty tgt3t; € [12]. This result is obtained by using our labeling and evaluating our t's. 
From our labeling we know f3 = ae If we replace tz with t?, we have Nt; to i t= 
Nt) te ee This can be simplified to Nt t2, since e =e. So Nt fbotgt; = Nt te, and one 


symmetric generator goes by to [12]. 


Nt tgt3 t2 € [1214], which is a new double coset. If we conjugate our original relation 
(1,3) tet bb = tatgtyt by (13) we get (31) tbo t3 te = tat tyhs. And t4t) t4t3 € [1214] since 


Nt tet) eee 


= Ntatt4t3. Therefore N fj t2 t3 t2 € [1214] and one symmetric generator 


moves forward. 


Nt t2f3 t3 € [121]. In order to prove this we will use our labeling. 


Nt fp t3t3 = Nt tot; tf since & = tf 


=Nt hth 


= Nt, tet), since t =e 


so one symmetric generator goes back to [121] 


N tj t2 3 t4 € [1234], which is a new double coset. Thus, one symmetric generator moves 


forward. 


[1212] 


[1214] 


[1234] 


Figure 4.19: Cayley Graph of 3*? :), Da 
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6th Double Coset[1212] 


Nt tot tN ={N(t fet to)” |neN} 
= {N(ty fet) t2)°, N(t ath 2), N(q ty 2)", N(t tty 2)" 8, 
= N(ty byt 2) 9°), N(q th 2)?! N(t oh 2), Nh bt )?)} 
={Nth bthbhth,Nihihh,Nbbhth,Nbt bth h, 
Ntqtstgt3t4, Nig tatgtats, Nigbtbhts,Nh th tat} 
(4.51) 


The point stabilizer of N 1212 — {9}, Similarly, the coset stabilizer N (1212) — fe}. The 


number of single right cosets in N“?!) = INI = 8-8. The orbits of N“*!”) on 
& 8: |N@212) | 1 


X = {1,2,3,4} are {1}, {2}, {3}, {4}. Now we select a representative from each orbit, say 


le {1},2 € {2},3 € {3} and 4 € {4} and determine the double coset it belongs to. 


Nj t2t, t2t, € [12121] which is a new double coset. Thus, one symmetric generator 


moves forward. 


Nt tot tote € [1214], since Nt bt tt = Nh bt . and B = t4. We substitute tf, to ob- 


tain Nt f2t; t4. Thus, one symmetric generator goes to [1214]. 
Nt tat; t2t3 € [1212]. Thus, one symmetric generator goes to [1212]. 
Nt, tot) t2t4 € [121]. We use our labeling to establish N fj tot) tot, = Nh tot te i We sim- 


plify Nt ft) t2t% to Nt) ft) t3 = Nt ft. Thus, one symmetric generator goes back to 


[121]. 


(*] 


(1214) 


[123] 


[1234] 


Figure 4.20: Cayley Graph of 3*? tm Da 
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(12121) 
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7th Double Coset[1214] 


Nt totttsaN ={N(th bt) ta)"|neN} 
= {N(t tot) ta)®, N(t tot t) 4), N( hy to ty ta), N(4 2 ty ta)? 9, 
N(ty ta ty t4) PO), Nh tty ty) 2, N(t fot 4), NC tty ty) °°} 
={Nth bthy,Nyth tts, Nbtjbt,Nbt bh, 
Ntatg tat), Nt3 ty t3 to, N t3 to t3 ta, Nt ta hy fo} 


(4.52) 
The point stabilizer of N!*"4 = {e}. Similarly, the coset stabilizer N“?!” = {e}. The 


number of single right cosets in N“?'4) = aN = 8-8. The orbits of N“*!* on 
g g |N@214)| 1 


X = {1,2,3,4} are {1}, {2}, {3}, {4}. Now we select a representative from each orbit, say 


le {1},2 € {2},3 € {3} and 4 € {4} and determine the double coset it belongs to. 


Nty tot t4t, € [123]. If we conjugate our relation (13) 3 f2t) t3 = tyt3 t,t, by (1,4,3,2) we 


get bh 4h = htgt, 


hbttah=thbttsh 
= ft ihbtzt, 
=hbhtst, (4.53) 
= si to t3t4 since t3 = 
= fo t3t4 since e =e 


N tots t, € [123] since N(ty to tz) 1234) = Ntiotsty. Therefore, N tj tot tyt) = N to tg ty € [123]. 


Nt, tot) t4t2 € [121]. In order to prove this, we will use our labeling. Recall t, = G and 
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t} = e. Therefore, 
Nt bth t4b= Nt tat Bt 
=Nt ttt (4.54) 


=Nt bth 


Thus, one symmetric generator goes back to [121]. 


Nt tg) t4t3 € [1234]. In order to prove this, we will use the relation obtained by conju- 
gating the original relation fg t2 ty t2 = t4t3t4t) by (1,4,3,2) to obtain ft tah = tghtgts. 
This relation can be rewritten as fo tj t4t) = 13 te fs ty. 
tht tats = tht tats 

= ty ft) yt); since f3 = t? 

=thhtthh 

=ftibhtth (4.55) 

= tig hr tgtsty 

= ty tf fpt3 tat) since t= t? 

= totstqt, since ie =e 
Nt t2t tat3 = Ntot3tqt) = N(tyt2t3t,)"*>” © [1234]. Thus, one symmetric generator 


goes to [1234]. 


Nty tot, tat, € [1212]. In order to prove this we will use our labeling. If t, = e then 
i = f). Therefore Ny tot taty= Nh bt) om which can be rewritten as Nf ft) t2 € [1212]. 


Thus, one symmetric generator goes to [1212]. 
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(12121) 


1 
[123] 


[1234] 


Figure 4.21: Cayley Graph of 3*? : Da 


8th Double Coset[1234] 


Nt to t3 tgN = {N(ty t2t3t4)” | n€ N} 
= {N(ty fo t3t4)°, N(ty to t3 t4) 9”), N(ty te b3 t4) 7°), N( ty tb ty) 08, 
N (ty fo t3 tg) 9 @), N( ty to t3 tg)" 99”, Nt ttt), N(ty fo 3 t))} 
= {Nt bt3ts, Ntg ty to tz, Ntotgt4t, Nir ty tats, Nta tg tot, 
Nig tq ty bo, Nt3 tot t4, Nt ta t3 to} 
(4.56) 


The point stabilizer of N!*°4 = {e}. Similarly, the coset stabilizer N“?5" = {e}. The 


number of single right cosets in N23 = Ml_ — 8 = 8. The orbits of N@2 on 
g g |N@234) | 1 


X = {1,2,3,4} are {1}, {2}, {3}, {4}. Now we select a representative from each orbit, say 


le {1},2 € {2},3 € {3} and 4 € {4} and determine the double coset it belongs to. 
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Nt, tat3t4t, € [12341], which is a new double coset. Thus, one symmetric generator 


moves forward. 


N tj tag tq tz € [123]. From our labeling ‘ = f2 so we can rewrite N fy fo f3 ty to as N ty fo t3 is to 
which is equal to Nt fz f3 € [123] since t3 = e. Thus Nty fp t3 t4 fe € [123]. Thus, one sym- 


metric generator goes to [123]. 


Nt tag t4t3 € [1234]. In order to prove that Nty tz tg t4t3 € [1234] we will conjugate our 
original relation fg t2t) t2 = t4t3tqt; by (14)(23) we obtain tgf3tyt3 = tot) t,. Now we 
can rewrite the relation as the following: 
by tg tats = ty fot) ta 
ty | ta t3 tats = ty ty tty ty 
(3tgt3 = tah tot ty 
We will use the relation to #3 t4t3 = tat) t2t) t4 to prove Nt f2f3 ta tz € [1234]. 
ty ty ty ty ty = ty ty tp ty ty tot ty 
= ty tg ty ty tat ty 


(4.57) 
=hhhthh 
= Ighot ty 
N(ty tz t3 t4)"9) = N32 ty tg So Nf3 lz ty ty € [1234]. Thus, one symmetic generator goes to 


[1234]. 


N tj t2t3 t4t4 € [1214]. In order to prove this, we conjugate our original relation #3 ft) t2 = 


t4t3t4t, by (13) to obtain 4 fy fgt2 = t4t, t4tg. We can rewrite the relation as tj yf to 
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yt tats. 


ty to t3 tat, = t te tg te since t2 = ti 
(4.58) 


= (4h (413 


Nt ho t3 tat, = Ntgt tatg = N(t)ftt4)"*>” © [1214]. Thus, one symmetric generator 


goes to [1214]. 


(12121) 


[1234] [12341] 


Figure 4.22: Cayley Graph of 3** tm Da 
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9th Double Coset[12121] 


Nt tot tbtN={N(h bt ht)" |neM 
={N(t bt tt)? Nh bh pt)”, N(q bt th)? Nh bh t)oS”, 
N(t tat ft) 99?) N(t bth ht) 99°, Nh bh t)o, Nh bt bt)?” 
={Nth bt bh, Ntht4hiy,Nbbhth,Nhbth bth, 
Nt4t3 t4t3 ta, Ntgtgt3tgt3, Nig btgtets, Nh tah tat} 
(4.59) 
The point stabilizer of N!*!?! = {e}. However, since Nt ft) t2t; = Ntzt) tot; t, then 


(1,2)(3,4) « N“?12)_ Additionally, Nf f2 ty ft) = Ntyt3 ta f3 t4, then (1,4) (2,3) « N{2!2), 


The coset stabilizer N@2!2) > N}2121 | since NU2!2D = fe (1,2)(3, 4), (1,4) (2,3), (1,3)(2,4)}. 


The number of single right cosets in N{?!2) = nT = 8 = 2. There is one single or- 


bit for N“?!2)) which is {1,2,3,4}. Now we select a representative from each orbit, say 


3€ {1,2,3,4} and determine the double coset it belongs to. 


Nt bot tt) tg = Nt tet) t € [1212] since t, tz = e = e. Thus all four symmetric genera- 


tors go back to [1212]. 
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[12121] 


(*] (1) 


[1234] [12341] 


Figure 4.23: Cayley Graph of 3** tm Da 


10th Double Coset[12341] 


Nt tet3t4 N = {N (ty to t3tat)” |ne N} 
= {N(ty fet tat1)®, N(4 fe tg ty), N(t fo tg tat)? 
N (ty fo tg ty ty) 8, N(t tots tat) 9), 
(4.60) 
N( ty fo ty tt) VPP, N(t to b3 tat), N(h fo tg tat) °} 
={Nt btjtyh, Nish btty, Nbtgtyh bh, Nb tytsh, 
Ntgtgtet ty, Nitgt bts, Ntgtet tats, Nh tala tet} 
The point stabilizer of N!*34! = {e}. However, since N ty tz t3 ty t) = N32 ty tats, 
then (1,3) « N@234)_ Thus, N@234D = 171234! since N|234D = fe, (13)}. The number of 
single right cosets in N{#34) = iy = $=4,. The orbits N54) on X = {1,2,3, 4} are 


{1,3}, {2}, and {4}. Now we select a representative from each orbit, say 3 € {1,3}, 2 € {2}, 


and 4 € {4} and determine the double coset it belongs. 


93 


Nt tg t3 t4 ty tz € [1234]. In order to prove this, we use our labeling ¢3 = ¢? and t} = e 


Nt) f2t3 tat t3 = Nt f2t3t4h 3 
_ 2 
= Nt} t2 t3 ta hy tf 
(4.61) 
=Nthtgtat} 


=Nt bolst, 


Thus N tj fo fg t4 ty tg € [1234] and two symmetric generators go to [1234]. 


N ty ta 3 tq ty tf € [123412], which is a new double coset. Thus, one symmetric generator 


moves forward. 


Nt to t3 t4ty tq € [12341]. Thus, one symmetric generator goes to [12341]. 


[12121] 


©) 
[123] 1 C) RB 
(2) 


[1234] [12341] [123412] 


Figure 4.24: Cayley Graph of 3*? ty, Da 
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11th Double Coset[123412] 


N ty fo t3 ty tj toN = {N(ty ft f3 ty te)” | n€ N} 
= {N( ty fo t3 ty ty t2)°, N( ty bo 3 ta ty 2) 0), Ny ft tg ty bo), 
N (ty fof ta ty fo) 0? 8, N( ty to 3 ta ty t2) VO, 
N(ty tat ta ty t2) 92, N( ty to t3 ta ty to) >), N(ty tot ta ty 2) °} 
={Nt bttsht,Nithbhbti4h, Nb bith bt,Nbttbthth, 
N tg 03 tot tats, Ntgta th t2t3 ta, Night tab te, Nt ty tg fo ty ta} 
(4.62) 
The point stabilizer of N!*34!* = {e}. However, since N ty tz t3 t ty t2 = N13 to ty ta f3 to, 
then (1,3) « N°78412), Additionally, Nt) t2 £3 t4 ty t2 = N t2 t t4 ty t t3, then (1,2,3,4) € NO7412), 


Thus, N@23412) = nz123412 cince NU23412) = fe (1,3), (1, 2,3, 4), (1,3)(2, 4), (1, 2)(3,4)}. The 


N(128412) i = 2 = 2. The orbit N42) on 


number of single right cosets in (NUD = 4 


X = {1,2,3,4} is {1,2,3,4}. Now we select a representative from the orbit, say 4 deter- 
mine the double coset it belongs. 
Nt, bots ty hy tot, € [12341]. 
hhbigthhbty=hhtt4hh é 
= 3 
= hth 
(4.63) 

=f bttate 

= hhh 
Nt tot3 tt tot, = Nt tet3t,t € [12341]. Thus, four symmetric generators go back to 


[12341]. 


[12121] 


1 
(123] 


[1234] [12341] 


Figure 4.25: Cayley Graph of 3** :m Da 


[123412] 
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Appendix A 


MAGMA CODE 2*?° : (Dsx3) 


N:=TransitiveGroup(15,3); 
#N; 

N; 
Generators (N) ; 

N.1; 

N.2; 

S:=Sym(15) ; 

xx:=S!((1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 
yy:=S!((1, 4)(2, 8)(3, 12)(6, 9)(7, 13) (11, 14)); 
N:=sub<S|xx,yy>; 

#N; 

FPGroup (N) ; 

NN<x, y>:=Group<x, yl y72,x7-4*y*x*y>; 

#NN ; 


Sch:=SchreierSystem(NN, sub<NN|Id(NN)>) ; 
ArrayP:=[Id(N): i in [1..30]]; 
for i in [2..30] do 
P:=[Id(N): 1 in [1..#Sch[i]]]; 
for j in [1..#Sch[i]] do 
if Eltseq(Sch[i])[j] eq 1 then P[j]:=xx; end if; 
if Eltseq(Sch[i])[j] eq -1 then P[j]:=xx7-1; end if; 
if Eltseq(Sch[i])[j] eq 2 then P[j]:=yy; end if; 


15)); 
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if Eltseq(Sch[i])[j] eq -2 then P[j]:=yy~-1; end if; 
end for; 

PP:=Id(N) ; 

for k in [1..#P] do 

PP:=PP*P[k]; end for; 

ArrayP [i] :=PP; 

end for; 


N1:=Stabiliser(N,1); 
#N1; 
N1; 


Generators (N1) ; 

for i in [1..30] do if ArrayP[i] 

eq N!((2, 5)(3, 9)(4, 13)(7, 10)(8, 14)(12, 15)) 
then Sch[i]; end if; end for; 


Orbits(Stabiliser(N,1)); 


G<x,y,t>:=Group<x,y,tly72,x7-4*y*x*y, t72, (t,y7x), (t,t7(x75)), 
(t,t7(x710)), (t,t7x), (¢,t7(x72)), (t,t7(x73)), (t, t7(x76)), 
(t,t7(x77)), (t,t7(x711))>; 


C:=Classes(N) ; 
C; 


for i in [1..48] do 17*ArrayP[i], Schli]; end for; 


for i in [2..12] do 
i, Orbits(Centraliser(N,C[i] [3])); 
end for; 


for a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q in [0..17] do 
G<x,y,t>:=Group<x,y,tly72,x7-4*y*x*y, t72, (t,y7x), (t,t7(x75)), 
Ch beter lO) Cay tee) Chytr an). Cat Gera). Xte £76) 
(t,t7(x77)), (t,t7(x711)), 

(x72 * y * x*t7x)7a, 

(x72 * y * x*t)~b, 

(x72 * y * x#t7(x73))7c, 
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((x * y)72*t)-d, 

((y * x7-1)72#t)e, 
(x73*t) “f, 

(x72 * y* x * y*t)g, 
(x * y*t7x) 7h, 
y*t)7i, 

y*t? (x73))7j, 
x7-1*t°x) 7k, 

x7 = Tet) cL, 

Cy * x7-14t7(x73))7n, 
(x*t) “n, 

(x72*t) 70, 

Cy * x°-2 * y*t)-p, 
(y * x7-1 * y*t)~q>; 


if #G gt 30 then a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q, 
#G; 
end if; end for; 


Appendix B 


MAGMA CODE 2*?? : (D3 x 5) 


N:=TransitiveGroup(15,4) ; 
#N; 

N; 
Generators (N) ; 

N.1; 

N.2; 

S:=Sym(15) ; 

xx:=S!((1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15)); 
yy:=S!((1, 11)(2, 7)(4, 14)(5, 10)(8, 13)); 

N:=sub<S|xx,yy>; 

FPGroup (N) ; 

NN<x, y>:=Group<x,yly72, x7-4*y*x7-1*y>; 

#NN ; 


Sch:=SchreierSystem(NN, sub<NN|Id(NN)>) ; 
ArrayP:=[Id(N): i in [1..30]]; 

for i in [2..30] do 

P:=[Id(N): 1 in [1..#Sch[i]]]; 

for j in [1..#Sch[i]] do 

if Eltseq(Sch[i])[j] eq 1 then P[j]:=xx; end if; 

if Eltseq(Sch[i])[j] eq -1 then P[j]:=xx7-1; end if; 
if Eltseq(Sch[i])[j] eq 2 then P[j]:=yy; end if; 

end for; 
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PP:=Id(N) ; 

for k in [1..#P] do 
PP:=PP*P[k]; end for; 
ArrayP [i] :=PP; 

end for; 


N1:=Stabiliser(N,1); 
#N1; 
Generators (N1) ; 


for i in [1..30] do if ArrayP[i] 
eq N!((2, 12)(3, 8)(5, 15)(6, 11)(9, 14)) 
then Sch[i]; end if; end for; 


G<x,y,t>:=Group<x,y,tly72, x7-4*y*x7-l*y, t72, 
Orbits (Stabiliser(N,1)); 


Xx73; 
xx*Yy; 
(xx74) *yy; 
(xx77) *yy; 
xx} 

Xx72; 
xx74; 

yy; 

(xx73) *yy; 


G<x,y,t>:=Group<x,y,tly72, x7-4*y*x7-l*y, t72, 
(t,t7(x73)), 

(t,t7(x*y)), 

(t, t7((x74)*y)), 

(t,t7 ((x77) *y)), 

(t,t7x), 

(t,t7(x72)), 

(t,t7(x74)), 

Cet) 

(t,t7((x73) *y))>; 


(t,y7x)>; 


(t,y7x), 
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C:=Classes(N) ; 
C; 
Classes (N); 


for i in [2..15] do 
i, Orbits(Centraliser(N,C[i] [3])); 
end for; 


for j in [2..15] do 
C{j1 [3]; 

for iin [1..30] do 

if ArrayP[i] eq C[j] [3] 
then Sch[i]; end if; 
end for; 

end for; 


for a,b,c,d,e,f,g,h,i,j,k,l,m,n in [0..10] do 
G<x,y,t>:=Group<x,y,tly72, x7-4*y*x7-l*y, y°x, t72, 
(y*x*t) a, 

(x * y * x7-1 * y*t7(x73))~b, 

(x734*t7 (x#y)) 7c, 

(x7-34t7(y * x7-1))7d, 

(x * y * x7-2 * y*t7(y * x72))7e, 

(x72 * y * x7-1 * y*t7x) Ff, 

(x * y*t? (y*x))“g, 

(x*-2 * y*t7(x72))7h, 

Cy * x72et7(x * y * x))7i, 

Cy * x7-1et7(x * y * x7-2))7j, 

(x*t7 (x7-1))7k, 

(x72*t7(x * y * x7-1))71, 

(y * x7-1 * y*t*y)*m, 

(x7-24t7(y * x7-2))7n>; 


if #G gt 30 then a,b,c,d,e,f,g,h,i,j,k,l,m,n, #G; 
end if; end for; 


(t,y7x), 
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Appendix C 


MAGMA CODE 2*”* : (4 x 2: S3) 


2* 24: N 
(1, 10) @, 5), 7) 4, 8)(6, 9) C1, 12) 


Cc 
N = 
Permutation group N acting on a set of cardinality 24 
Order = 48 = 2°74 * 3 
(1, 9)(2, 10)(3, 11)(4, 12)(5, 13)(6, 14)(7, 15) (8, 
(17, :28):(18,,21) (20, 24) 
(1, 15, 17)(2, 18, 18)(3, 11, 19) (4, 16, 20)65, 10, 
(6, 14, 22)(7,. 9,23) (8, 12, 24) 
Cy 2 Ay BIB By Ge 1) 04> 16° 12, 15) 410, 44, 13; 
(17522, 20,19)18,.°24,. 21,23) 
Ly Ba By 6) C2, ey By GOO TA TOs TCO. 1G, 185 
CT Pg 249-205 23) (184 194 21. 22) 
(1, 4)(2, 5)(3, 6)(7, 8)(9, 12) (10, 13) (11, 14) (15, 
(17, 20) (18,21) (19, 22)(23, 24) 


Stabiliser of 1 in N 
Permutation group acting on a set of cardinality 24 
Order = 2 
(2, 6)(3, 5)(7, 8) (9, 21) (10, 17) (11, 23)(12, 18) 
(13, 20)(14, 24) (15, 
22) (16, 19) 
Hf 


16) 


21) 


14) 


15) 


16) 
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S:=Sym(24) ; 


xx:=S!(1, 9)(2, 10)(3, 11)(4, 12)(5, 13)(6, 14)(7, 15) (8, 


(17, 23)(18,21) (20, 24); 


yy:=S!(1, 15, 17) (2, 18, 18)(3, 11, 19) (4, 16, 20)(5, 10, 


(6, 14, 22)(7, 9,23)(8, 12, 24); 
zz:=S!(1, 2, 4, 5)(3, 8, 6, 7)(9, 
(17, 22, 20,19)(18, 24, 21, 23); 
ww:=S!(1, 3, 4, 6)(2, 7, 5, 8)(9, 
(17, 24, 20,23)(18, 19, 21, 22); 
pp:=S!(1, 4)(2, 5)(3, 6)(7, 8)(9, 
(17, 20)(18,21) (19, 22) (23, 24); 


N:=sub<S|xx,yy,ZzZ,ww, pp>; 
#N; 


#sub<S|xx,yy,zz>; 
/*48% / 
#sub<S|xx,yy>; 
/*6*/ 
#sub<S|xx,zz>; 
/*16*/ 
#sub<Slyy,zz>; 
/*24x / 


N:=sub<S|xx,yy,zz>; 


FPGroup (N) ; 


16, 12, 15)(10, 11, 13, 
14, 12, 11)(10, 16, 13, 


12) (10, 13) (11, 14) (45, 


NN<x,y,z>:=Group<x,y,z|x72, y73, 274, (y7-1 ¥*x)72, 
Z-2 * y7-1 * 272 * y, (y*z7-1*x) 72, 
z--1 * y°-1 * 27-1 * y°-1 *z * y°-1>; 


#NN ; 


Sch:=SchreierSystem(NN, sub<NN|Id(NN)>) ; 


ArrayP:=[Id(N): i in [1..48]]; 
for i in [2..48] do 

P:=[Id(N): 1 in [1..#Sch[i]]]; 
for j in [1..#Sch[i]] do 


if Eltseq(Sch[i])[j] eq 1 then P[j]:=xx; end if; 


16) 


21) 


14) 


15) 


16) 


if Eltseq(Sch[i])[j] eq 2 then P[j]:=yy; end if; 
if Eltseq(Sch[i])[j] eq -2 then P[j]:=yy~-1; end 
if Eltseq(Sch[i])[j] eq 3 then P[j]:=zz; end if; 
if Eltseq(Sch[i])[j] eq -3 then P[j]:=zz7-1; end 


end for; 

PP:=Id(N) ; 

for k in [1..#P] do 
PP:=PP*P[k]; end for; 
ArrayP [i] :=PP; 

end for; 


Orbits(Stabiliser(N,1)); 


N1:=Stabiliser(N,1); 

N1; 

N12:=Stabiliser(N,[1,2]); 
C12:=Centraliser(N,N12); 

C12; 

/* This was to check the famous lemma. 


We found out that the lemma does not apply*/ 


W, phi :=WordGroup(N) ; 
rho :=InverseWordMap (N) ; 
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if; 


if; 


A:=N!(2, 6) (3, 5)(7, 8)(9, 21)(10, 17)(11, 23)(12, 18) (13, 20) 


(14, 24) (15,22) (16, 19); 
A; 
A@rho ; 


AA:=function(W) 


w3 := W.3°-1; w4 := W.1 * w3; w2 := W.27-1; w5 : 


function> end function; 


AACNN) ; 


Stabiliser(N,1) eq sub<N|xx * zz7-1 * yy7-1>; 


w4 * w2; return w5; 


G<x,y,z,t>:=Group<x,y,z,t|x72, y~3, 274, (y7-1 * x)72, 


105 


Z7-2 * y7-1 * 272 * y,(y * z7-1 * x)72, 
Zr-1 * yo-1 * z7-1 * yo-1 * z * y7-1, t72, (t,x * z7-1 * y~-1)>; 


Orbits(N12) ; 


C:=Classes(N) ; 

for j in [2..8] do 

C(j] (3); 

for iin [1..48] do 

if ArrayP[i] eq C[j] [3] 
then Sch[i]; end if; 
end for; 

end for; 


#C; 


C; 
for iin [2..8] do i,C[i] [3], Orbits(Centraliser(N,C[i][3])); end for; 


for iin [1..48] do 17*ArrayP[i], Schli]; end for; 
/*The code above will print out the names :)*/ 


/* MAKE t COMMUTE WITH EVERYTHING 


(z72et) , 

(z*x*z*t~ (y7-1)), 
(z*x*zxt7 (y*z¥y)), 
(Z*xX*Z*t) , 

(Z*X*Z*tAZ) , 

(z*x¥z*t7 (x * y7-1 * z)), 
(zex*zet7 (x * z7-1 * x)), 
(zax*zet7( x * y * z)), 
Cy*t) , 

(y*t7z) , 

(y*t> (x*y7-1*z)), 

(y*t7 (x*y7-1)), 

(zxt) , 


(z*et7(x * y7-1 * z)), 
(zat7(y * z)), 
Cy*zet) , 

(y*z*t7z) , 

(y*zet7 (x * y7-1 * z)), 
(y*z*t7 (x * y7-1)), 
(Z*X*t) , 

(zZ*x*t7Z) , 

(z¥x*t7 (y7-1)), 

(z7-1 * x*t), 

(z7-1 * x*t7z), 

(z*-1 * x#t7(y7-1)), 
*/ 


G<x,y,z,t>:=Group<x,y,z,t|x°2, y~3, 274, (y7-1 *x)72, z7-2 * 
yr-1 * 27-2 * y, Cy*z7-1*x)72, z7-1 * y7-1 * z7-1 * y°-1 *z * 
y"=1, 

(z72*t) 7a, 

(z¥*x*Z*t7 (y7-1)) 7b, 
(Z*x*Z*t7 (y*z*y)) 7c, 
(z*x*z*t) “d, 

(Z*X*Z*t7Z) ~e, 

(z*x*zat7 (x * y7-1 * z))7f, 
(z*x*zaet7 (x * z7-1 * x))7g, 
(zex*zet7( x * y * Z))7h, 
Cy*t) 7i, 

(y*t7z)7j, 

(y#t* (x*y7-1#z)) 7k, 

(y*t> (x*y7-1)) 71, 

(z*t) nm, 

(z*t7(x * y7-1 * z))cn, 
(z*t~(y * z))7Oo, 

(y*z*t) “p, 

(y*z*t7z) ~q, 

(y*zat7 (x * y7-1 * z))7r, 
(y*zat7 (x * y7-1))7s, 
(z*x*t) “t, 

(z*x*t7zZ) “u, 

(z*x*t7 (y7-1))-v, 
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(z7-1 * x*t)7a.1, 
(z7-1 * x*t7z)7a.2, 
(27-1 * x#t7(y7-1))7a.3>; 


if #G gt 48 then 
a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,a.1,a.2,a.3, 
#G; 

end if; end for; 
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Appendix D 


MAGMA CODE 2° :3 


S:=Sym(6) ; 

xx:=S!(3, 6); 

yyee=Siti, 8, 5) (25 4, 6) 
G:=sub<S|xx,yy>; 


Classes (G) ; 
CT:=CharacterTable(G) ; 
CT; 


H:=sub<G/ (2, 5),(2, 5)(3, 6),(1, 4)(@2, 5)>; 

Classes (H) ; 

CH: =CharacterTable(H) ; 

CH; 

for iin [2..8] do for j in [7,8] do if Induction(CHLi],G) eq CT[j] 
then i, j; end if; end for; end for; 


:=Transversal (G,H); 
:=Classes(G) ; 


#C; 
for i in[1..8] do C[i] [3]; end for; 
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H:=sub<G/ (2, 5),(2, 5)(3, 6),(1, 4) (2, 5)>; 
D:=Classes(H) ; 

#D; 

for i in[1..8] do D[i] [3]; end for; 


C:=CyclotomicField(2) ; 

GG:=GL(3,C) ; 

As=([Gs4,0;0l 4 Ayam, Ever} 

for i ,j in [1..3] do A[i,j]:=0; end for; 

for i,j in [1..3] do if T[i]*xx*T[j]~-1 in H then 
A[i,j]:=CH([8] (TLi]*xx*T[j]~-1); end if; end for; 
B:=[[C.1,0,0]) ¢ 4-4n [1.313 

for i ,j in [1..3] do B[i,j]:=0; end for; 

for i,j in [1..3] do if T{i]*yy*T[j]~-1 in H then 
BLi, j]:=CH([8] (TLi]*yy*T[j]~-1); end if; end for; 
GG!A; GG!B; 


Order (GG! A) ; 
Order (GG!B) ; 
Order (GG! A*GG!B) ; 


H:=sub<GG|A,B>; 

#H; 
IsIsomorphic(H,G) ; 
S:=Sym(6) ; 
xx:=S!(3,6) ; 
yy:=S!(1,2,3) (4,5,6); 
N:=sub<S|xx,yy>; 

#N; 
IsIsomorphic(N,G) ; 


XX*Yy ; 


N1:=Stabiliser(N,{1,4}); 
N1; 


#N1 ; 


NN<a, b>:=Group<a,b|a72,b73, (axb)76, (a,b)72>; 
#NN ; 


(xx, yy); 


NN<a, b>:=Group<a, b| a72,b73, (a*b) 6, (a,b) 72>; 
#NN ; 


W:=WordGroup(N) ; 
rho :=InverseWordMap (N) ; 
a:=N!(3,6); 
b:=N!(2,5); 
c:=N!(1,4); 
a@rho; 
function(W) 
return W.1; 
end function 
XX; 


b@rho ; 
function (Ww) 


w2 := W.27-1; w3 := W.1 * w2; w4 := W.2 * w3; return w4; 


end function 


B:=function (W) 

function> w2 := W.27-1; w3 := W.1 * w2; w4 
return w4; 

function> end function; 


B(NN) ; 
yy*xx*yy~-1; 


c@rho; 
function (Ww) 


w2 := W.27-1; w6 := w2 * W.1; w7 := w6 * W.2; return w7; 


end function 
C:=function (W) 


:= W.2 * wW3; 
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function> w2 := W.27-1; w6 := w2 * W.1; w7 := w6 * W.2; 
return w7; 

function> end function; 

CCNN) ; 

XX7Yy; 


G<x,y,t>:=Group<x,y,t|x72,y73, (x*y) 6, (x,y)72, (t,x), 
(t,yxx*y7-1) ,t7(x7y)=t72>; 
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Appendix E 
MAGMA CODE 4° :4 


S:=Sym(8) ; 
T:=TransitiveGroups (8) ; 
T; 

T[30] ; 


A:=S!(2, 6)(3, 7); 

B:=S!(1, 3)(4, 8)(5, 7); 
C:=S!(1, 2, 3, 8)(4, 5, 6, 7); 
N:=sub<S|A,B,C>; 

N 


Center (N) ; 
CompositionFactors(N) ; 
NL:=NormalLattice(N) ; 
NL; 


for iin [1..13] do if IsAbelian(NL[i]) then i;end if;end for; 
NL[8] ; 


X:=AbelianGroup(GrpPerm, [4,4]); 
IsIsomorphic(NL[8] ,X); 
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q,ff:=quo<N|NL[8]>; 

qs 

#q; 

q eq sub<qlq.1,q.2,q.3>; 
A:=N!(2, 8, 6, 4); 

BIN CL. B85 by Cy By 65-4) 


T:=Transversal(N,NL[8]); 


C:=N!(1, 2, 3, 8)(4, 5, 6, 7); 

for i in [0..3] do for j in [0..3] do i,j, A7i*B7j; end for; end for; 
A-T(3]; 

A*B73; 

B°T(3]; 

A*2*B°3; 
H<a,b,c>:=Group<a,b,cla74,b74, (a,b) ,c74,a*c=a*b73, b*c=a72*b*3> ; 


f ,H1,k:=CosetAction(H,sub<H|Id(H) >) ; 
IsIsomorphic(H1,N); 


Appendix F 


MAGMA CODE (4 x 2°) : S3 


S:=Sym(12) ; 

T:=TransitiveGroups (12) ; 

T; 

T(53] ; 

A:=8!(1, 7)(3, 9) (4, 10)(6, 12); 

B:=S!(1, 4, 7, 10)(2, 5, 8, 11)(3, 6, 9, 12); 
C:=8!(1, 5, 9)(2, 6, 10)(3, 7, 11)(4, 8, 12); 
D:=S!(1, 5)(2, 10)(4, 8)(7, 11); 
N:=sub<S|A,B,C,D>; 

N 


#N; 

CompositionFactors(N) ; 

NL: =NormalLattice(N) ; 

NL; 

for iin [1..14] do if IsAbelian(NL[i]) then i;end if;end for; 
NL[7]; 


X:=AbelianGroup(GrpPerm, [4,2,2]); 
IsIsomorphic(NL[7] ,X); 


q,ff:=quo<N|NL[7]>; 
q; 
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qi:=q.3; 

q2:=q.4; 

NL[7] ; 

A:=N!(1, 4, 7, 10)(2, 5, 8, 11)(3, 6, 9, 12); 
B:=N!(3, 9)(6, 12); 

C:=N!(1, 7)(3, 9)(4, 10)(6, 12); 

D:=N!(1, 7) (2, 8)(4, 10)(5, 11); 


/* I need to determine if I need all four, that is, A,B,C,D.*/ 


M:=sub<N|A,B,C>; 
#M; 


/*So I don’t need D since NL[7] is order 16*/ 
A:=N'(1, 4, 7, 10)(2, 5, 8, 11)(3, 6, 9, 12); 


:=N!(3, 9)(6, 12); 
C:=N!(1, 7) (3, 9)(4, 10)(6, 12); 


ies) 


T:=Transversal(N,NL[7]); 
D:=N!(1, 5, 9)(2, 6, 10)(3, 7, 11)(4, 8, 12); 
E:=N!(1, 5)(2, 10)(4, 8)(7, 11); 


A-T(2]; 
B°T(2]; 


A-T[2] eq AD; 
> A°T[2] eq A; 


for i in [0..3] do for j in [0..1] do for k in [0..1] do i,j,k, 
A71i*B7j*C7k; 
end for; end for; end for; 


/*A°TT] eq A; 
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(1, 4, 7, 10)(2, 5, 8, 11)(3, 6, 9, 12) 
> BvD; 
(1, 7) (4, 10) 


NOT NEEDED C*T[2]; 
(2, 8)(3, 9)(5, 11)(6, 12) 


C*D; 
(1, 7)(2, 8)(4, 10)(5, 11) 
A*E; 


A-T[3] eq A*B72; 
BE; 
B-T[3] eq B*C72;; 


C°T[3] eq C; 
c-T[3]; 
(2, 8)(3, 9)(5, 11) (6, 12) 


C“E eq C*D; 


H<a,b,c,d,e>:=Group<a,b,c,d,ela74,b72,c72, (a,b), (a,c), (b,c), 
d*3,e°2, (d*e) “2,a°d=a, b“d=b*c ,c~d=a72*b,a~e=a, b~e=b, c7e=a7~2Q*b*C>; 


f ,H1,k:=CosetAction(H,sub<H|Id(H) >) ; 
IsIsomorphic(H1,N); 
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Appendix G 


MAGMA CODE (4 x 2°) : Ay 


S:=Sym(24) ; 
T:=TransitiveGroups (24) ; 
T[500] ; 


/*Permutation group acting on a set of cardinality 24 

Order = 192 = 2°76 * 3 
(1, 3)(2, 4)(5, 23)(6, 24)(11, 12)(13, 14) (15, 16) (17, 18) (19, 22) 
(20, 21) 
(1, 7, 22, 24, 10, 19)(2, 8, 21, 23, 9, 20)(3, 11, 15, 6, 14, 18) 
(4, 12,16, 5y. 13, 17)%/ 


xx:=S!(1, 3)(2, 4)(5, 23)(6, 24)(11, 12)(13, 14)(15, 16) 

(17, 18)(19, 22) (20,21); 

VWeSOlCL, Fy 005 Od, 10,19) (2, By 01) 03. 9) B03) 11h 15, 6;-14,. 18) 
(4, 12, 16, 5, 13, 17); 

N:=sub<S|xx,yy>; 

N; 


#N; 
CompositionFactors(N) ; 


NL:=NormalLattice(N) ; 
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NL; 


for iin [1..9] do if IsAbelian(NL[i]) then i;end if;end for; 


NL[5] ; 
X:=AbelianGroup(GrpPerm, [4,2,2]); 
IsIsomorphic(NL[5] ,X); 


q,ff:=quo<N|NL[5]>; 
q; 


At=NUCL, 5, 24, 4) (2, 6, 93; 3)(7,. 14, 10, 14) (8, 12, 9, 13) 
(iby oO. 16. 19) (1621. 17. 20); 

B:=N!(1, 2)(3, 4)(5, 6)(15, 17) (16, 18)(19, 21)(20, 22)(23, 24); 
C:=N!(1, 23)(2, 24)(3, 5)(4, 6)(7, 8)(9, 10) (11, 12) (13, 14); 
D:=N!(1, 24)(2, 23)(3, 6)(4, 5)(7, 10)(8, 9)(11, 14)(12, 13) 
(15, °18)¢16,. 17) (19,,° 229.090. 21) 


/*BUT I need to determine if I need all four that is A,B,C,D.*/ 


A:=N!(1, 5, 24, 4)(2, 6, 23, 3)(7, 11, 10, 14)(8, 12, 9, 13) 
(15, 28 = 16. 10) 1621S ar 20 )s 

B:=N!(1, 2)(3, 4)(5, 6)(15, 17) (16, 18)(19, 21) (20, 22)(23, 24); 
C:=N!(1, 23)(2, 24)(3, 5)(4, 6)(7, 8)(9, 10)(11, 12)(13, 14); 
M:=sub<N|A,B,C>; 

#M; 


/* 16, so I do not need D, since NL[5] is order 16 
So far the presentation NL[5] is 
<a,b,cla7{4},. b712}, c7t2), Cab), Ca, oe) (bj, c)> -*/ 


T:=Transversal(N,NL[5]); 
T; 


IsIsomorphic(q,Alt(4)); 


FPGroup (q) ; 


Generators(NL[5]); 


A; 
B; 
C; 


NL[5] eq sub<NL[5]|A,B,C>; 


ff(T[2]) eq q.1; 
ff(T[3]) eq q.2; 


T2:=N!(1, 3)(2, 4)(5, 23)(6, 24)(11, 12) (13, 14) (15, 
(19, 22)(20,21) ; 


T3:=N!(1, 7, 22, 24, 10, 19)(2, 8, 21, 23, 9, 20) 
(3, 11, 15, 6, 14, 18)(4, 12,16, 5, 13,17); 


for i in [0..3] do for j,k in [0..1] do 
if A°T2 eq A*i*B7j*C“k then i,j,k; 
end if; end for; end for; 


for i in [0..3] do for j,k in [0..1] do 


if B°T2 eq A7i*B7j*C“k then i,j,k; 
end if; end for; end for; 


for i in [0..3] do for j,k in [0..1] do 


16) (17, 18) 


if C°T2 eq A7i*B7j*C7~k then i,j,k;end if;end for; end for; 


for i in [0..3] do for j,k in [0..1] do 


if C°T3 eq A7i*B7j*C7k then i,j,k;end if;end for; end for; 


for i in [0..3] do for j,k in [0..1] do 


if A°T3 eq A7i*B7j*C7k then i,j,k;end if;end for; end for; 


for i in [0..3] do for j,k in [0..1] do 


if B°T3 eq A7i*B7j*C7k then i,j,k;end if;end for; end for; 


H<a,b,c,d,e>:=Group<a,b,c,d,ela74,b72,c°2, (a,b), (a,c), (b,c) ,d°2, 
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e773, (d*e) “3, a7d=axb*c , b*d=b,c~d=c ,a~e=a73*c,b~e=c>; 
H<a,b,c,d,e>:=Group<a,b,c,d,ela74,b72,c~2, (a,b), (a,c), (b,c) ,d°2, 
e73, (d*e) “3, a7d=axb*c , b*d=b, c~d=c ,a*e=a73*c, b7e=c, C7 e=a7~Q*b*C>; 
#H; 


f ,H1,k:=CosetAction(H,sub<H|Id(H) >) ; 
IsIsomorphic(H1,N); 

/*false*/ 

#N; 


Order (T2) eq Order(q.1); 

true 

Order (T3) eq Order(q.2); 

false 

Order (T2*T3) eq Order (q.1*q.2); 
/*falsex*/ 

Order (T3) ; 


Order (q.2); 


for i in [0..3] do for j,k in [0..1] do 
if T3°3 eq A7i*B7j*C7k then i,j,k;end if;end for; end for; 


Order (T2*T3) ; 
Order (q.1*q.2); 


for i in [0..3] do for j,k in [0..1] do 
if (T2*T3)~3 eq A*i*B7j*C7k then i,j,k;end if;end for; end for; 


H<a,b,c,d,e>:=Group<a,b,c,d,ela74,b72,c°2, (a,b), (a,c), (b,c) ,d°2, 
e73=a72, (d*e) “3=a*xb,a~d=a*xb*c , b~d=b,c~d=c ,a~e=a73*c, b*e=c, 
c~e=a72*b*c>; 

#H; 


f ,H1,k:=CosetAction(H,sub<H|Id(H)>); 
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MAGMA CODE PSL(2, 11) 


G<x,y,t>:=Group<x,y,t|1x73,y73, (x*y)72, t72, 
(t,x*y7-1*x), 

txt yt? (xty) et y=y72*t7 (x72) *t7(y72) , 
(x*y*t7y) 73>; 

#G; 

f ,G1,k:=CosetAction(G,sub<G|x,y>); 
CompositionFactors(G1) ; 

Index (G,sub<G|x,y>) ; 
#DoubleCosets(G,sub<G|x,y>,sub<G|x, y>) ; 
DoubleCosets(G, sub<G|x, y>, sub<G|x,y>) ; 
DoubleCosets(G, sub<G|x, y>, sub<G|x,y>) ; 


DC:=[Id(G1), 

£CE); 

f(t * x * t), 
f(t * y * t), 

f(t *x*t * y * t), 
f(t * x * t* y7-1 * t), 
f(t * x * t * x7-1 * t), 
f(t * y*t * y7-1 * td; 


ts:=[Id(G1) : i in [1..6]]; 
ts[1] :=f(t); 


ts[2] :=f(t~y); 
ts[3] :=f(t7x) ; 
ts[4] :=f(t7 (xty)); 
ts [5] =f Ge 2))s 
ts[6] :=f(t7(y72)); 
IN:=sub<G1lf(x) ,f(y)>; 
cst := [null : i in [1 .. 55]] where null is [Integers() |]; 
prodim := function(pt, Q, I) 
v i= pt; 
for iin I do 
v := v7 (Q(il); 
end for; 
return v; 
end function; 
for i := 1 to 6 do 
cst[prodim(1, ts, [i])] := (il; 
end for; 
m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt+1; end 
if; end for; m; 


/*6*/ 


S:=Sym(6) ; 

xx:=S!(1, 3, 5)(2, 4, 6); 
yy:=S!(1, 2, 6)(3, 4, 5); 
N:=sub<S|xx,yy>; 
N1:=Stabiliser(N,1); 

#N1; 

N1; 

Orbits (N1); 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2] eq g*(DCli])~h then i; end if; end for; 
end for;/* 3 */ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[4] eq g*(DCli])~h then i; end if; end for; 
end for;/*2*/ 

for iin [1..8] do 
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for g,h in IN do 
if ts[1]*ts[3] eq g*(DCl[i])~h then i; break;break; 
end if; end for; end for;/*4*/ 


/*Third Double Coset*/ 

S:={[1,2]}; 

SS:=S7N; 

SSS :=Setseq (SS) ; 

for iin [1..#SS] do 

for g in IN do if ts[1]*ts[2] 

eq g*ts[Rep(SSS[i]) [1]] *ts[Rep(SSS[i] ) [2]] 
then print SSS[i]; 

end if; end for; end for; 


N12:=Stabiliser(N,[1,2]); 
N1i2s:=N12; 
tri:=Transversal(N,N12s) ; 
for i := 1 to #tri do 
ss := [1,2]-trifil]; 
cst[prodim(1, ts, ss)] := ss; 
end for; 
m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt1; 
if; end for; m; 
/*18*/ 
Orbits(N12s) ; 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1] eq g*(DC[i])~h then i; end if; 
end for; end for;/*7*/ 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[2] eq g*(DCLli])~h then i; end if; 
end for; end for;/*2*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[3] eq g*(DCLi])~h then i; end if; 
end for; end for; /*6*/ 


end 
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for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[4] eq g*(DCLli])~h then i; end if; 
end for; end for; /*5*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[5] eq g*(DCLi])~h then i; end if; 
end for; end for; /*3*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[6] eq g*(DC[i])~h then i; end if; 
end for; end for; /*4*/ 


/*S:={[1,4]}; 

SS:=S7N; 

SSS :=Setseq(SS) ; 

for iin [1..#SS] do 

for g in IN do if ts[1]*ts[4] 

eq g*ts[Rep(SSS[i]) [1]] *ts[Rep(SSSs [i] ) [2]] 
then print SSS[i]; 

end if; end for; end for; 


/*{{ 1, 4 ]}*/ 


N14:=Stabiliser(N,[1,4]); 
N14s:=N14; 
#N14s ; 
/*2*/ 
tr2:=Transversal (N,N1i4s) ; 
for i := 1 to #tr2 do 
ss := [1,4]-tr2[i]; 
cst[prodim(1, ts, ss)] := ss; 
end for; 
m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt1; 
end if; end for; m; 
Orbits(N14s) ; 
for iin [1..8] do for g,h in IN do 
if ts[1]*ts[4]*ts[1] eq g*(DC[i])~h then i; end if; 
end for; end for;/*1*/ 
for iin [1..8] do for g,h in IN do 


if ts[1]*ts[4]*ts[4] eq g*(DC[i])~h then i; end if; 
end for; end for;/*2*/ 

for iin [1..8] do for g,h in IN do 

if ts[1]*ts[4]*ts[2] eq g*(DCLli])~h then i; end if; 
end for; end for;/*3*/ 

for iin [1..8] do for g,h in IN do 

if ts[1]*ts[4]*ts[3] eq g*(DCli])~h then i; end if; 
end for; end for;/*4*/ */ 


/*Fourth Double Coset*/ 

S:={[1,3]}; 

SS:=S7N; 

SSS :=Setseq (SS) ; 

for iin [1..#SS] do 

for g in IN do if ts[1]*ts[3] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS [i] ) [2]] 
then print SSS[i]; 

end if; end for; end for; 


N13:=Stabiliser(N,[1,3]); 
N1i3s:=N13; 
#N13s; 
/*1*/ 
tr3:=Transversal (N,N13s) ; 
for i := 1 to #tr3 do 
ss := [1,3]°tr3[i]; 
cst[prodim(1, ts, ss)] := ss; 
end for; 


m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt1; 


end if; end for; m; 
/*30*/ 
Orbits(N13s) ; 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[1] eq g*(DC[i])~h then i; end if; 
end for; end for;/*8*/ 

for iin [1..8] do 

for g,h in IN do 
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if ts[1]*ts[3]*ts[2] eq g*(DC[i])~h then 
end for; end for;/*6*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[3] eq g*(DCLli])~h then 
end for; end for;/*2*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[4] eq g*(DCLi])~h then 
end for; end for;/*7*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[5] eq g*(DCLi])~h then 
end for; end for;/*3*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[6] eq g*(DCLli])~h then 
end for; end for;/*4*/ 


/*Fifth Double Coset*/ 
S:={[1,2,4]}; 

SS:=S7N; 

SSS :=Setseq (SS) ; 

for i in [1..#SS] do 

for g in IN do if ts[1]*ts[2]*ts[4] 


eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]]*ts[Rep(SSS [i] ) [3]] 


then print SSS[i]; 
end if; end for; end for; 


/* 


*/ 


N124:=Stabiliser(N, [1,2,4]); 
N124s :=N124; 
tr5:=Transversal (N,N124s) ; 
for i := 1 to #tr5 do 

ss := [1,2,4]-tr5[i]; 


; end 


; end 


; end 


; end 


; end 


if; 


if; 


if; 


if; 


if; 
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cst[prodim(1, ts, ss)] := ss; 
end for; 
m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt+1; end 
if; end for; m; 


for n in N do if [1,2,4]-n eq [3,4,6] 
then N124s:=sub<N|N124s ,n>; 

end if; end for; 

#N124s; 

Generators (N124s) ; 

[1,2,4]-N124s; 


for n in N do if [1,2,4]-n eq [5,6,2] 
then N124s:=sub<N|N124s ,n>; 

end if; end for; 

#N124s; 

Generators (N124s) ; 

[1,2,4]-N124s; 


/*34*/ 
Orbits(N124s) ; 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[4] *ts[1] eq g*(DC[i])~h then i; end if; 
end for; end for;/*7*/ 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[4]*ts[2] eq g*(DC[i])“h then i; end if; 
end for; end for;/*3*/ 


/*Sixth Double Coset*/ 

SSL (125313 

SS:=S7N; 

SSS :=Setseq (SS) ; 

for iin [1..#SS] do 

for g in IN do if ts[1]*ts[2]*ts[3] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]]*ts[Rep(SSS [i] ) [3]] 


then print SSS[i]; 
end if; end for; end for; 


/* 


*/ 

N123:=Stabiliser(N, [1,2,3]); 

N123s :=N123; 

tr6:=Transversal (N,N123s) ; 

for i 1 to #tr6 do 
ss := [1,2,3]-tr6[il; 
cst[prodim(1, ts, ss)] := ss; 

end for; 

m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt1; 

end if; end for; m; 

/*38*/ 

for n in N do if [1,2,3]7n eq [3,1,2] 

then N123s:=sub<N|N123s,n>; 

end if; end for; 

#N123s; 

Generators(N123s) ; 

[1,2,3]-N123s; 


for n in N do if [1,2,3]7n eq [2,3,1] 
then N123s:=sub<N|N123s,n>; 

end if; end for; 

#N123s; 

Generators(N123s) ; 

[1,2,3]-N123s; 


Orbits(N123s) ; 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[3] *ts[1] eq g*(DC[i])~h then i; 


end if; end for; end for;/*3*/ 


for iin [1..8] do 
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for g,h in IN do 
if ts[1]*ts[2]*ts[3]*ts[4] eq g*(DC[i])“h then i; 
end if; end for; end for;/*4*/ 


/*Seventh Double Coset*/ 

S:={[0,2,1)}5 

SS:=S7N; 

SSS :=Setseq (SS) ; 

for iin [1..#SS] do 

for g in IN do if ts[1]*ts[2]*ts[1] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]]*ts[Rep(SSS [i] ) [3]] 
then print SSS[i]; 

end if; end for; end for; 


N121:=Stabiliser(N, [1,2,1]); 
N1i21s:=N121; 
tr7:=Transversal(N,N121s) ; 
for i := 1 to #tr7 do 
ss := [1,2,1]°tr7[il]; 
cst[prodim(1, ts, ss)] := ss; 
end for; 
m:=0; for iin [1..55] do if cst[i] ne [] then m:=mt1; 
end if; end for; m; 
/*50*/ 
Orbits(N121s) ; 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1] *ts[1] eq g*(DC[i])~h then i; 
end if; end for; end for;/*3*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1]*ts[2] eq g*(DC[i])“h then i; 
end if; end for; end for;/*7*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1]*ts[3] eq g*(DC[i])“h then i; 
end if; end for; end for;/*4*/ 
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for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1]*ts[4] eq g*(DC[i])~h then i; 
end if; end for; end for;/*5*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1]*ts[5] eq g*(DC[i])~h then i; 
end if; end for; end for;/*7*/ 

for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[2]*ts[1]*ts[6] eq g*(DC[i])~h then i; 
end if; end for; end for;/*8*/ 


/*Eighth Double Coset*/ 

SiC Sti ks 

SS:=S7N; 

SSS :=Setseq (SS) ; 

for iin [1..#SS] do 

for g in IN do if ts[1]*ts[3]*ts[1] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]]*ts[Rep(SSS [i] ) [3]] 
then print SSS[i]; 

end if; end for; end for; 


N131:=Stabiliser(N, [1,3,1]); 
N131s:=N131; 
tr8:=Transversal (N,N131s) ; 
for i := 1 to #tr8 do 
ss := [1,3,1]-tr8[i]; 
cst[prodim(1, ts, ss)] := ss; 
end for; 
m:=0; for iin [1..55] do if cst[i] ne [] then m:=m+t1; end 
if; end for; m; 
/*54*/ 


for n in N do if [1,3,1]7n eq [2,4,2] 
then N131s:=sub<N|N1i31s,n>; 

end if; end for; 

#N131s; 


Generators(N131s) ; 
[1,3,1]°“N131s; 


Orbits(N131s) ; 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[1] *ts[1] eq g*(DC[i])~h then i; 
end if; end for; end for; 


/*4*/ 


for iin [1..8] do 

for g,h in IN do 

if ts[1]*ts[3]*ts[1]*ts[3] eq g*(DC[i])“h then i; 
end if; end for; end for; 


/*7*/ 
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Appendix I 


MAGMA CODE of 3*°:,,, Du 


S:=Sym(A) ; 

xx:=5!(1,2,3,4); 

yy :=S!(2,4); 

N:=sub<S|xx,yy>; 
G<x,y,t>:=Group<x,y,t|x74,y72, (x*y)°2,t73, (y,t) ,t7 (x72)=t72, 
(x72 y*t*t7x) 74>; 

#DoubleCosets(G,sub<G|x,y>, sub<Glx,y>); 

f ,G1,k:=CosetAction(G,sub<G|x,y>) ; 

#G1; 

CompositionFactors(G1) ; 

H:=sub<Glx,y, 

y * x72 *t* x* te xX Kt KX Ket * KX *t * KX * D>; 
f ,G1,k:=CosetAction(G,sub<G|x,y>) ; 
CompositionFactors(G1) ; 

IN: =sub<G1|f(x) ,f(y)>; 

ts := [ Id(G1): iin [1 .. 4) ]; 

ts[1]:=f(t); ts[2]:=f(t7(x)); ts[3]:=ts[1]7-1; 

ts[4] :=ts[2]7-1; 


DoubleCosets(G, sub<G|x,y>, sub<G|x,y>); 
#DoubleCosets(G,sub<G|x,y>, sub<G|x,y>); 
#G1; 
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DC:=[ £( Id(G)), 

RC GD), 

fC t * x * t), 

fC t *x * t * x * t7-1), 
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£C t * x * tex*t), 

fC t * x * t * x * t7-1 * x * t7-1), 

fC t* x*t* x* t * x * t7-1), 

fC t*xx*t*xx*t * x * t), 

fC t * x * t * x * t7-1 * x * t7-1 * x * t), 


f(t *x*t*ex*t*ex* t * x * t+), 


fC t*xx*t*ex*t exe te xe te x * t) d; 


Index(G1,IN) ; 


cst := [null : i in [1 .. 60]] where null is [Integers() | ]; 
prodim := function(pt, Q, I) 
v i= pt; 
for iin I do 
v := v7(Q(il); 
end for; 
return v; 


end function; 

for i := 1 to 4 do 
cst[prodim(1, ts, [i])] := [il]; 
end for; 


m:=0; for iin [1..60] do if cst[i] ne [] then m:=mt1; end if; 


end for;m; 

Orbits(N) ; 

for iin [1..#DC] do for m,n in IN do 
break;end if; end for;end for; 


N1:=Stabiliser(N,1); 
Generators(N1) ; 
Orbits (N1); 


for iin [1..#DC] do for m,n in IN do 
eq m*(DCL[i])“n then i; break; end if; 
for iin [1..#DC] do for m,n in IN do 
eq m*(DC[i])*n then i; break; end if; 
for iin [1..#DC] do for m,n in IN do 


if ts[1] eq m*(DC[i])~n then i; 


if ts[1]*ts[1] 
end for;end for; 
if ts[1]*ts[2] 
end for;end for; 
if ts[1]*ts[3] 


eq m*(DC[i])“n then i; break; break;end if; end for;end for; 


S:={[1,2]}; 

SS:=S7N;SS; 

SSS :=Setseq (SS) ; 

for i in [1..#SSS] do 

for g in IN do if ts[1]*ts[2] 


eq g*ts[Rep(SSS[i]) [1]]*ts[Rep(SSS[i] ) [2]] 


then print SSS[i]; 
end if; end for; end for; 


N12:=Stabiliser(N,[1,2]); 
Orbits (N12) ; 

#N12; 

N12s:=sub<N|N12>; 
tri:=Transversal(N,N12s) ; 
for i:=1 to #tr1 do 
ss:=([1,2]-tri(il; 

cst [prodim(1,ts,ss)]:=ss; 
end for; 


m:=0; for iin [1..60] do if cst[i] ne 1] 


then m:=mt+1; 
end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 
eq m*(DC[i])“n then i; break; break; end 
for iin [1..#DC] do for m,n in IN do if 
eq m*(DC[i])“n then i; break; break; end 
for iin [1..#DC] do for m,n in IN do if 
eq m*(DC[i])“n then i; break; break; end 
for iin [1..#DC] do for m,n in IN do if 
eq m*(DC[i])“n then i; break; break; end 


$:={[1,2,1]}; 
SS:=S7N;S8; 

SSS :=Setseq (SS) ; 

for iin [1..#SSS] do 


ts [1] *ts[2] *ts[1] 
if; end for;end for; 
ts [1] *ts[2] *ts [2] 
if; end for;end for; 
ts [1] *ts[2] *ts [3] 
if; end for;end for; 
ts [1] *ts[2] *ts [4] 
if; end for;end for; 
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for g in IN do if ts[1]*ts[2]*ts[1] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]] *ts[Rep(SSS[i]) [1]] 
then print SSS[il]; 

end if; end for; end for; 


N121:=Stabiliser(N, [1,2,1]); 
Orbits (N121); 

#N121; 

N121s:=sub<N|N121>; 
tri:=Transversal(N,N121s) ; 
for i:=1 to #tr1 do 
ss:=[1,2,1]-trif[i]; 

cst [prodim(1,ts,ss)]:=ss; 
end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
then m:=mt1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2]*ts[1]*ts[1] 
eq m*(DC[i])“n then i; break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2]*ts[1] *ts[2] 
eq m*(DC[i])“n then i; break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2]*ts[1]*ts[3] 
eq m*(DC[i])7n then i; break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2]*ts[1]*ts[4] 
eq m*(DCL[i])7n then i; break; break; end if; end for;end for; 


St=U11, 2.3135 

SS:=S7N;S8; 

SSS :=Setseq (SS) ; 

for iin [1..#SSS] do 

for g in IN do if ts[1]*ts[2]*ts[3] 

eq g*ts[Rep(SSS[i]) [1]] *ts[Rep(SSS[i] ) [2]]*ts[Rep(SSS[i] ) [3]] 
then print SSS[i]; 

end if; end for; end for; 


N123:=Stabiliser(N, [1,2,3]); 
Orbits (N123) ; 
#N123; 
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N123s :=sub<N|N123>; 

tri:=Transversal (N,N123s) ; 

for i:=1 to #tr1 do 

ss:=[1,2,3]-trif[i]; 

cst [prodim(1,ts,ss)]:=ss; 

end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
then m:=mt1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2]*ts[3]*ts[1] 
eq m*(DC[i])7n then i; break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2] *ts[3] *ts[2] 
eq m*(DC[i])7n then i; break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2] *ts[3] *ts[3] 
eq m*(DC[i])7n then i; break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if ts[1]*ts[2]*ts[3]*ts[4] 
eq m*(DCL[i])“n then i; break; break; end if; end for;end for; 


St={ [e254 216 

SS:=S7N;SS; 

SSS :=Setseq (SS) ; 

for i in [1..#SSS] do 

for g in IN do if ts[1]*ts[2]*ts[1]*ts[2] 
eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS [i] ) [2]] 
*ts [Rep (SSS [i] ) [1]]*ts[Rep(SSS [i] ) [2]] 
then print SSS[il]; 

end if; end for; end for; 


N1212:=Stabiliser(N,[1,2,1,2]); 
Orbits(N1212) ; 

#N1212; 

N1212s:=sub<N|N1212>; 

tri:=Transversal (N,N1212s) ; 

for i:=1 to #tr1 do 

ss:=[1,2,1,2]“trifil; 

cst [prodim(1,ts,ss)]:=ss; 

end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
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then m:=mt+1; 
end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[1] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[2] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[3] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[4] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 


$:={[1,2,1,4]}; 

SS8:=S7N;SS; 

SSS :=Setseq(SS) ; 

for iin [1..#SSS] do 

for g in IN do if ts[1]*ts[2]*ts[1]*ts[4] 
eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS [i] ) [2]] 
*ts [Rep (SSS [i]) [1]]*ts[Rep(SSS [i] ) [4]] 
then print SSS[il]; 

end if; end for; end for; 


N1214:=Stabiliser(N,[1,2,1,4]); 
Orbits (N1214) ; 

#N1214; 

N1214s:=sub<N|N1214>; 
tri:=Transversal(N,N1214s) ; 

for i:=1 to #tr1 do 
ss:=[1,2,1,4]“trifil; 

cst [prodim(1,ts,ss)]:=ss; 

end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
then m:=m+1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2]*ts[1]*ts[4]*ts[1] eq m*(DCLi])-n 


break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2]*ts[1]*ts[4]*ts[2] eq m*(DC[i])7n 


break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2]*ts[1]*ts[4]*ts[3] eq m*(C[i])7n 


break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2]*ts[1]*ts[4]*ts[4] eq m*(DCLi])-n 


break; end if; end for;end for; 


S:={[1,2;3,4]}; 

SS:=S7N;SS; 

SSS :=Setseq (SS) ; 

for i in [1..#SSS] do 

for g in IN do if ts[1]*ts[2]*ts[3]*ts[4] 
eq g*ts[Rep(SSS[i]) [1]] *ts[Rep(SSS[i] ) [2]] 
*ts [Rep (SSS [i] ) [3] ]*ts[Rep(SSS [i] ) [4]] 
then print SSS[i]; 

end if; end for; end for; 


N1234:=Stabiliser(N,[1,2,3,4]); 
Orbits (N1234) ; 

#N1234; 

N1234s :=sub<N|N1234>; 
tri:=Transversal (N,N1234s) ; 

for i:=1 to #tr1 do 
ss:=[1,2,3,4]-trifil; 

cst [prodim(1,ts,ss)]:=ss; 

end for; 

m:=0; for iin [1..60] do if cst[i] ne 7 
then m:=mt1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 


then 


then 


then 


then 


i; break; 


i; break; 


i; break; 


i; break; 


ts[1]*ts[2]*ts[3]*ts[4]*ts[1] eq m*(DC[i])7n then i; break; 
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break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[3]*ts[4]*ts[2] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2] *ts[3] *ts[4]*ts[3] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[3]*ts[4]*ts[4] eq m*(DC[i])7n then i; break; 
break; end if; end for;end for; 


S:={[1,2,1,2, 1]; 

SS:=S7N;SS; 

SSS :=Setseq (SS) ; 

for i in [1..#SSS] do 

for g in IN do if ts[1]*ts[2]*ts[1]*ts[2]*ts[1] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS [i] ) [2]] 

*ts [Rep (SSS [i] ) [1]]*ts[Rep(SSS [i] ) [2]]*ts [Rep(SSS [i] ) [1]] 
then print SSS[il]; 

end if; end for; end for; 


N12121:=Stabiliser(N,[1,2,1,2,1]); 
#N12121; 
N12121s:=N12121; 


for n in N do if [1,2,1,2,1]“n eq [2,1,2,1,2] 
then N12121s:=sub<N|N12121s,n>; 

end if; end for; 

#N12121s; 

Generators (N12121s) ; 

[1,2,1,2,1]°N12121s; 


for n in N do 

if [1,2,1,2,1]-n eq [4,3,4,3,4] 
then N12121s:=sub<N|N12121s,n>; 
end if; end for; 

Generators (N12121s) ; 
[1,2,1,2,1]7N12121s; 
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Orbits (N12121); 

#N12121; 
N12121s:=sub<N|N12121>; 
tri:=Transversal(N,N12121s) ; 
for i:=1 to #tr1 do 
ss:=[1,2,1,2,1]-trifil; 

cst [prodim(1,ts,ss)]:=ss; 
end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
then m:=mt+1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[1]*ts[1] eq m*(DC[i])“n then i; 
break; break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[1]*ts[2] eq m*(DC[i])“n then i; 
break; break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[1]*ts[3] eq m*(DC[i])“n then i; 
break; break; end if; end for;end for; 

for iin [1..#DC] do for m,n in IN do if 
ts[1]*ts[2]*ts[1]*ts[2]*ts[1]*ts[4] eq m*(DC[i])~n then i; 
break; break; end if; end for;end for; 


S=([t,2.334 115 

SS:=S7N;S8; 

SSS :=Setseq (SS) ; 

for iin [1..#SSS] do 

for g in IN do if ts[1]*ts[2]*ts[3]*ts[4] *ts[1] 

eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]] *ts[Rep(SSS [i] ) [3]] 
*ts [Rep (SSS [i]) [4]] *ts[Rep(SSS[i]) [1] ] 

then print SSS[i]; 

end if; end for; end for; 


N12341:=Stabiliser(N,[1,2,3,4,1]); 
#N12341 ; 
N12341s:=N12341; 


for n in N do if [1,2,3,4,1]7n eq [3,2,1,4,3] 
then N12341s:=sub<N|N12341s,n>; 

end if; end for; 

#N12341s; 

Generators (N12341s) ; 

[1,2,3,4,1]-N12341s; 


Orbits (N12341) ; 

#N12341; 

N12341s :=sub<N|N12341>; 
tri:=Transversal (N,N12341s) ; 
for i:=1 to #tr1 do 
ss:=[1,2,3,4,1]-trifi]; 

cst [prodim(1,ts,ss)]:=ss; 
end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
then m:=mt+1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2] *«ts[3] *ts[4]*ts[1]*ts[1] eq m*(DC[i])“n then 


break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2]*ts[3] *ts[4]*ts[1]*ts[2] eq m*(DC[i])7n then 


break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2] «ts [3] *ts[4]*ts[1]*ts[3] eq m*(DC[i])“n then 


break; break; end if; end for;end for; 
for iin [1..#DC] do for m,n in IN do if 


ts[1]*ts[2]*ts[3] *ts[4]*ts[1]*ts[4] eq m*(DC[i])7n then 


break; break; end if; end for;end for; 


Si=([1, 253,471, 2)}: 
SS:=S$7N;S8; 

SSS :=Setseq (SS) ; 

for i in [1..#SSS] do 


for g in IN do if ts[1]*ts[2]*ts[3]*ts[4] *ts[1]*ts [2] 
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eq g*ts[Rep(SSS [i] ) [1]]*ts[Rep(SSS[i] ) [2]]*ts[Rep(SSS [i] ) [3]] 
*ts [Rep (SSS [i] ) [4]]*ts[Rep(SSS [i] ) [1]]*ts [Rep(SSS [i] ) [2]] 
then print SSS[i]; 

end if; end for; end for; 


N123412:=Stabiliser(N,[1,2,3,4,1,2]); 
#N123412; 
N123412s :=N123412; 


for nin N do-at 1, 2,3,4,4,2)-n oq 1253415253] 
then N123412s:=sub<N|N123412s ,n>; 

end if; end for; 

#N123412s; 

Generators (N123412s) ; 

[1,2,3,4,1,2]-N123412s; 


form in N do df. [1,2,3,4,1,2]-n.eq [3,214,352] 
then N123412s:=sub<N|N123412s ,n>; 

end if; end for; 

#N123412s; 

Generators (N123412s) ; 

[1,2,3,4,1,2]-N123412s; 


Orbits (N123412) ; 

#N123412; 
N123412s:=sub<N|N123412>; 
tri:=Transversal (N,N123412s) ; 
for i:=1 to #tr1 do 
ss:=[1,2,3,4,1,2]-tri({il; 

cst [prodim(1,ts,ss)]:=ss; 

end for; 

m:=0; for iin [1..60] do if cst[i] ne TJ 
then m:=mt1; 

end if; end for;m; 


for iin [1..#DC] do for m,n in IN do if 
ts[1] *ts [2] *ts[3] *ts [4] *ts[1] *ts[2] *ts[1] 
eq m*(DC[i])“n then i; break; break; 


end if; end for;end for; 


for iin [1..#DC] do for m,n in IN do if 
ts [1] *ts[2] *ts[3] *ts[4] *ts[1] *ts[2] *ts[2] 
eq m*(DC[i])7n then i; break; break; 

end if; end for;end for; 


for iin [1..#DC] do for m,n in IN do if 
ts [1] *ts[2]*ts[3] *ts[4] *ts[1] *ts[2] *ts[3] 
eq m*(DC[i])7n then i; break; break; 

end if; end for;end for; 


for iin [1..#DC] do for m,n in IN do if 
ts [1] *ts[2] *ts[3] *ts[4] *ts[1]*ts[2] *ts[4] 
eq m*(DC[i])7n then i; break; break; 

end if; end for;end for; 
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